fix

Author: hhugo

compiler/lib/source_map.ml

@@ -542,7 +542,6 @@ end
 type t =
   [ `Standard of Standard.t
   | `Index of Index.t
-  | `Url of Url.t
   ]
 
 let of_json = function

compiler/lib/source_map.mli

@@ -105,16 +105,17 @@ module Index : sig
   type nonrec t =
     { version : int
     ; file : string
-    ; sections : (offset * [ `Map of Standard.t | `Url of Url.t ]) list
+    ; sections : (offset * [ `Map of Standard.t ]) list
           (** List of [(offset, map)] pairs. The sourcemap spec allows for [map] to be
-            either a sourcemap object or a URL. *)
+            either a sourcemap object or a URL, but we don't need to generate
+            composite sourcemaps with URLs for now, and it is therefore not
+            implemented. *)
     }
 end
 
 type t =
   [ `Standard of Standard.t
   | `Index of Index.t
-  | `Url of Url.t
   ]
 
 val to_string : t -> string