diff options
author | 2001-04-03 08:04:19 +0000 | |
---|---|---|
committer | 2001-04-03 08:04:19 +0000 | |
commit | bb76b246d1396f788d18888abe8284befb7f44b9 (patch) | |
tree | b7dd5667977ceae4f3944945a55cac6412681abb /contrib | |
parent | 78811c7ecba58fc35a3441ac1d510c67e28b159e (diff) |
utilisation de Options.if_verbose
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1519 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib')
-rw-r--r-- | contrib/extraction/Extraction.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/extraction/Extraction.v b/contrib/extraction/Extraction.v index a5ec0a693..1f71ef2f2 100644 --- a/contrib/extraction/Extraction.v +++ b/contrib/extraction/Extraction.v @@ -11,7 +11,7 @@ Declare ML Module "mlutil.cmo" "ocaml.cmo" "extraction.cmo" "extract_env.cmo". Grammar vernac vernac : ast := extr_constr [ "Extraction" constrarg($c) "." ] -> [ (Extraction $c) ] -| extr_list [ "Extraction" "-r" ne_qualidarg_list($l) "." ] -> +| extr_list [ "Recursive" "Extraction" ne_qualidarg_list($l) "." ] -> [ (ExtractionRec ($LIST $l)) ] | extr_list [ "Extraction" stringarg($f) ne_qualidarg_list($l) "." ] -> [ (ExtractionFile $f ($LIST $l)) ] |