diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-11-12 19:32:13 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-11-12 19:32:13 +0000 |
commit | dca676a77ecc68240ad7beb1342ea1ff8963efb3 (patch) | |
tree | 26404e781eee69bae1d9a19211d490ee5c79e30c /parsing | |
parent | aca0bb7546310d87146d27f16b1e98699a23e085 (diff) |
Suppression du "..." final !
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4880 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
-rw-r--r-- | parsing/g_vernacnew.ml4 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/parsing/g_vernacnew.ml4 b/parsing/g_vernacnew.ml4 index 91e765dc4..a3c92311c 100644 --- a/parsing/g_vernacnew.ml4 +++ b/parsing/g_vernacnew.ml4 @@ -28,7 +28,7 @@ open Vernac_ open Module -let vernac_kw = [ ";"; ","; ">->"; ":<"; "<:"; "..."; "where"; "at" ] +let vernac_kw = [ ";"; ","; ">->"; ":<"; "<:"; "where"; "at" ] let _ = if not !Options.v7 then List.iter (fun s -> Lexer.add_token ("",s)) vernac_kw @@ -64,7 +64,7 @@ GEXTEND Gram subgoal_command: [ [ c = check_command; "." -> c | tac = Tactic.tactic; - use_dft_tac = [ "." -> false | [ "..." | ".."; "." ] -> true ] -> + use_dft_tac = [ "." -> false | ".."; "." -> true ] -> (fun g -> let g = match g with Some gl -> gl | _ -> 1 in VernacSolve(g,tac,use_dft_tac)) ] ] |