diff options
| author |  barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-08-07 13:45:20 +0000 |
|---|---|---|
| committer | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-08-07 13:45:20 +0000 |
| commit | f066302b4d4fca06ce9e891e2ba5c5ea60b70294 (patch) | |
| tree | cfb8da8b5beca807c75ba18007091f59a2d2d04d /scripts | |
| parent | 2592766937df60484f15d5050e5bfe6623c83390 (diff) | |
coqc: warning de l'option -dump-glob (unused case)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11315 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/coqc.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/scripts/coqc.ml b/scripts/coqc.ml index 6915d60bc..0fb704f7a 100644 --- a/scripts/coqc.ml +++ b/scripts/coqc.ml @@ -136,6 +136,7 @@ let parse_args () = | ("-db"|"-debugger") :: rem -> print_string "Warning: option -db/-debugger deprecated\n";flush stdout; parse (cfiles,args) rem + | "-dump-glob" :: _ :: rem -> Pp.msg_warning (Pp.str "option -dumpglob is obsolete"); parse (cfiles,args) rem | ("-?"|"-h"|"-H"|"-help"|"--help") :: _ -> usage () | ("-I"|"-include"|"-outputstate" @@ -159,8 +160,6 @@ let parse_args () = as o) :: rem -> parse (cfiles,o::args) rem - | "-dump-glob" :: _ :: rem -> Pp.msg_warning (Pp.str "option -dumpglob is obsolete"); parse (cfiles,args) rem - | "-where" :: _ -> let coqlib = try Sys.getenv "COQLIB" with Not_found -> Coq_config.coqlib |