diff options
| author | Maxime Dénès | 2016-11-17 10:43:44 +0100 |
|---|---|---|
| committer | Maxime Dénès | 2016-11-17 10:43:44 +0100 |
| commit | b00e039b957b8428c21faec5c76f3a3484cde2cf (patch) | |
| tree | b83393e89cc7e057a6ebcab574153198d8a5d4d1 /parsing | |
| parent | ca9e00ff9b2a8ee17430398a5e0bef2345c39341 (diff) | |
| parent | 26d180fa0b27edc773fd07c73906e4ed56475200 (diff) | |
Merge remote-tracking branch 'github/pr/360' into v8.6
Was PR#360: [stm] Remove STM-related vernaculars
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/g_vernac.ml4 | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/parsing/g_vernac.ml4 b/parsing/g_vernac.ml4 index 9b52d1bf31..4ba9eeefa9 100644 --- a/parsing/g_vernac.ml4 +++ b/parsing/g_vernac.ml4 @@ -64,16 +64,6 @@ GEXTEND Gram | IDENT "Local"; v = vernac_poly -> VernacLocal (true, v) | IDENT "Global"; v = vernac_poly -> VernacLocal (false, v) - (* Stm backdoor *) - | IDENT "Stm"; IDENT "JoinDocument"; "." -> VernacStm JoinDocument - | IDENT "Stm"; IDENT "Finish"; "." -> VernacStm Finish - | IDENT "Stm"; IDENT "Wait"; "." -> VernacStm Wait - | IDENT "Stm"; IDENT "PrintDag"; "." -> VernacStm PrintDag - | IDENT "Stm"; IDENT "Observe"; id = INT; "." -> - VernacStm (Observe (Stateid.of_int (int_of_string id))) - | IDENT "Stm"; IDENT "Command"; v = vernac_aux -> VernacStm (Command v) - | IDENT "Stm"; IDENT "PGLast"; v = vernac_aux -> VernacStm (PGLast v) - | v = vernac_poly -> v ] ] ; |