diff options
author | Samuel Mimram <smimram@debian.org> | 2008-01-03 16:26:12 +0000 |
---|---|---|
committer | Samuel Mimram <smimram@debian.org> | 2008-01-03 16:26:12 +0000 |
commit | 2281410e38ef99d025ea77194585a9bc019fdaa9 (patch) | |
tree | 71ba76741c3ab6b752be876565dc34b0b0138dc5 /scripts | |
parent | 4767d724d489a7ad67f696e9401e70b9f9ae2143 (diff) |
Imported Upstream version 8.1.pl3+dfsgupstream/8.1.pl3+dfsg
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/coqc.ml | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/scripts/coqc.ml b/scripts/coqc.ml index 676e9e51..cbcb6b4c 100644 --- a/scripts/coqc.ml +++ b/scripts/coqc.ml @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(* $Id: coqc.ml 7747 2005-12-28 10:28:41Z herbelin $ *) +(* $Id: coqc.ml 10235 2007-10-18 12:25:03Z notin $ *) (* Afin de rendre Coq plus portable, ce programme Caml remplace le script coqc. @@ -161,7 +161,10 @@ let parse_args () = | ("-v"|"--version") :: _ -> Usage.version () | "-where" :: _ -> - print_endline Coq_config.coqlib; exit 0 + let coqlib = + try Sys.getenv "COQLIB" with Not_found -> Coq_config.coqlib + in + print_endline coqlib; exit 0 | f :: rem -> if Sys.file_exists f then parse (f::cfiles,args) rem |