diff options
| -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 91e765dc4a..a3c92311cf 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)) ] ] |