[cleanup] opa_compiler_interface: removing all occurences in comments…

… of the now dead file

opa/pass_AddStdlibFiles.ml

@@ -52,23 +52,6 @@ let filtering_files path =
   in
   kept
 
-(*
-  This is a way for helping the reordering to have in the first place in the code
-  all the dependencies of the generated code by the compiler.
-*)
-let sort_stdlib =
-  let order_map =
-    [
-      ("opa_compiler_interface_private.opa" , 0)
-    ]
-  |> StringMap.from_list
-  in
-  let proj s =
-    let s = Filename.basename s in
-    Option.default max_int (StringMap.find_opt (Filename.basename s) order_map)  in
-  let cmp f1 f2 = compare (proj f1) (proj f2) in
-  fun l -> List.sort cmp l
-
 let folder acc path =
   if filtering_files path then path::acc else acc
 
@@ -77,12 +60,10 @@ let of_basedir basedirs options =
   else (
     let folder acc ~name:_ ~path = folder acc path in
     List.fold_left (fun acc basedir -> acc @ (File.fold_dir_rec folder [] basedir)) [] basedirs
-  |> sort_stdlib
   )
 
 let of_static_include options =
   if not options.O.stdlib then []
   else (
     List.fold_left folder [] StaticsInclude.file_list
-  |> sort_stdlib
   )

passes/surfaceAstRenaming.ml

@@ -1679,7 +1679,7 @@ let merge_maptoident_val infos acc toplevel_names =
        | (OpenedIdent (_, i, []),_) :: _ when is_exported i infos -> Some i
            (* it means that some value is first defined at toplevel by an open statement
             * it is possible but then the compiler won't access it
-            * (everything should be defined as an alias in opa_compiler_interface
+            * (everything should be defined as an alias with @opacapi
             * so no open *)
        | _  -> None) toplevel_names in
   stringmap_safe_merge acc names

stdlib/core/funaction/funaction.opa

@@ -66,7 +66,7 @@ FunAction = {{
 
 /**
    This module contains the runtime to serialize js call site in html using the adhoc S2 mode,
-   Entry point used by the compiler are alias defined in opa_compiler_interface:
+   Entry point used by the compiler are alias defined above:
    FunActionServer_serialize_call and FunActionServer_serialize_argument
 
    Deserialized : {arg : 'a ; serialized_arg : string} -> 'a

stdlib/core/xhtml/css.opa

@@ -48,7 +48,6 @@ type Css.compiled_property = {name: string; value:string}
 
 Css_private =
 {{
-  // Used by compiler (css.trx, via __internal__add_css_entry in opa_compiler_interface_private)
   order = Order.make_unsafe(compare) : order(Css.entry, Css.order)
   Entry_map=Map_make(/*compare:Css.entry->Css.entry->int*/ order)
 }}