Commit 08bce3b7 authored by Pietro Abate's avatar Pietro Abate
Browse files

[r2004-04-23 18:10:25 by beppe] Fix typo

Original author: beppe
Date: 2004-04-23 18:10:25+00:00
parent 9c908ebb
...@@ -153,6 +153,8 @@ let exe = match Sys.os_type with ...@@ -153,6 +153,8 @@ let exe = match Sys.os_type with
print "Cygwin detected... executable will have .exe extension"; "exe" print "Cygwin detected... executable will have .exe extension"; "exe"
| _ -> "" | _ -> ""
let ml_interface = let ml_interface =
let dir = !(List.assoc "mliface" vars) in let dir = !(List.assoc "mliface" vars) in
if dir = "" then `no if dir = "" then `no
...@@ -164,7 +166,7 @@ let ml_interface = ...@@ -164,7 +166,7 @@ let ml_interface =
else else
if Sys.file_exists if Sys.file_exists
(Filename.concat (Filename.concat dir "typing") file) then (Filename.concat (Filename.concat dir "typing") file) then
(print "ok'n"; `tree dir) (print "ok'\n"; `tree dir)
else else
(print "not found\n"; (print "not found\n";
fatal ("Cannot find ocaml compiler compiled modules, eg:" ^ file)) fatal ("Cannot find ocaml compiler compiled modules, eg:" ^ file))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment