We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent d930ce7 commit da643f5Copy full SHA for da643f5
vendor/ocaml/driver/compenv.ml
@@ -74,10 +74,13 @@ let is_unit_name name =
74
;;
75
76
let check_unit_name ppf filename name =
77
+#if undefined BS_NO_COMPILER_PATCH then
78
+ ()
79
+#else
80
if not (is_unit_name name) then
81
Location.print_warning (Location.in_file filename) ppf
82
(Warnings.Bad_module_name name);;
-
83
+#end
84
(* Compute name of module from output file name *)
85
let module_of_filename ppf inputfile outputprefix =
86
let basename = Filename.basename outputprefix in
0 commit comments