More compatible fix
This commit is contained in:
parent
ba0e2c7fff
commit
f2f2aef137
|
@ -89,7 +89,7 @@ let set_load_path path =
|
||||||
|
|
||||||
let toploop_use_silently fmt name =
|
let toploop_use_silently fmt name =
|
||||||
#if OCAML_VERSION >= (4, 14, 0)
|
#if OCAML_VERSION >= (4, 14, 0)
|
||||||
Toploop.use_silently fmt (File name)
|
Toploop.use_silently fmt (match name with "" -> Stdin | _ -> File name)
|
||||||
#else
|
#else
|
||||||
Toploop.use_silently fmt name
|
Toploop.use_silently fmt name
|
||||||
#endif
|
#endif
|
||||||
|
|
Loading…
Reference in New Issue