diff options
| author | Emilio Jesus Gallego Arias | 2017-05-17 21:04:18 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2017-05-23 01:37:52 +0200 |
| commit | c1e9a27d383688e44ba34ada24fe08151cb5846e (patch) | |
| tree | 59d85961c10043a5d49c690158ecbd7950f09968 /printing | |
| parent | 3c0d8d08bda81b9fbd7210e4e352a08bbe8219e8 (diff) | |
[vernac] Remove `Save thm id.` command.
We'd like to cleanup the `proof_end` type so we can have a smaller
path in proof save. Note that the construction:
```
Goal Type.
⋮
Save id.
```
has to be handled by the STM in the same path as Defined (but with an
opaque flag), as `Save id` will alter the environment and cannot be
processed in parallel.
We thus try to simply such paths a bit, as complexity of `lemmas.ml`
seems like an issue these days. The form `Save Theorem id` doesn't
really seem used, and moreover we should really add a type of "Goal",
and unify syntax.
It is often the case that beginners try `Goal addnC n : n + 0 = n."
etc...
Diffstat (limited to 'printing')
| -rw-r--r-- | printing/ppvernac.ml | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/printing/ppvernac.ml b/printing/ppvernac.ml index 3e41439c8c..76f1d8dd71 100644 --- a/printing/ppvernac.ml +++ b/printing/ppvernac.ml @@ -721,9 +721,7 @@ open Decl_kinds | Opaque (Some l) -> keyword "Qed" ++ spc() ++ str"export" ++ prlist_with_sep (fun () -> str", ") pr_lident l) - | Some (id,th) -> (match th with - | None -> (if opac <> Transparent then keyword "Save" else keyword "Defined") ++ spc() ++ pr_lident id - | Some tok -> keyword "Save" ++ spc() ++ pr_thm_token tok ++ spc() ++ pr_lident id) + | Some id -> (if opac <> Transparent then keyword "Save" else keyword "Defined") ++ spc() ++ pr_lident id ) | VernacExactProof c -> return (hov 2 (keyword "Proof" ++ pr_lconstrarg c)) |