Remove uchar and seq dummy modules (they all have their own opam pack…

…age and were never defined in neither the compiler on ocamlfind)

Signed-off-by: Kate <[email protected]>

src/dune_rules/findlib/meta.ml

@@ -238,8 +238,6 @@ let builtins ~stdlib_dir ~version:ocaml_version =
   in
   let dynlink = simple "dynlink" [] ~dir:"+" in
   let bytes = dummy "bytes" in
-  let uchar = dummy "uchar" in
-  let seq = dummy "seq" in
   let threads =
     { name = Some (Lib_name.of_string "threads")
     ; entries =
@@ -292,18 +290,6 @@ let builtins ~stdlib_dir ~version:ocaml_version =
       ; ocamldoc
       ]
     in
-    let base =
-      if Ocaml_version.stdlib_includes_uchar ocaml_version then
-        uchar :: base
-      else
-        base
-    in
-    let base =
-      if Ocaml_version.stdlib_includes_seq ocaml_version then
-        seq :: base
-      else
-        base
-    in
     let base =
       if Path.exists (Path.relative stdlib_dir "graphics.cma") then
         graphics :: base

src/dune_rules/ocaml_version.ml

@@ -20,12 +20,8 @@ let supports_response_file version = version >= (4, 05, 0)
 
 let ocamlmklib_supports_response_file version = version >= (4, 08, 0)
 
-let stdlib_includes_uchar version = version >= (4, 03, 0)
-
 let stdlib_includes_bigarray version = version >= (4, 07, 0)
 
-let stdlib_includes_seq version = version >= (4, 07, 0)
-
 let ooi_supports_no_approx version = version >= (4, 05, 0)
 
 let ooi_supports_no_code version = version >= (4, 05, 0)

src/dune_rules/ocaml_version.mli

@@ -29,15 +29,9 @@ val supports_response_file : t -> bool
 (** Does ocamlmklib support [-args0]? *)
 val ocamlmklib_supports_response_file : t -> bool
 
-(** Whether the standard library includes the [Uchar] module *)
-val stdlib_includes_uchar : t -> bool
-
 (** Whether the standard library includes the [Bigarray] module *)
 val stdlib_includes_bigarray : t -> bool
 
-(** Whether the standard library includes the [Seq] module *)
-val stdlib_includes_seq : t -> bool
-
 (** Whether ocamlobjinfo supports -no-approx*)
 val ooi_supports_no_approx : t -> bool