diff options
Diffstat (limited to 'test-suite/ide')
-rw-r--r-- | test-suite/ide/undo.v | 79 |
1 files changed, 79 insertions, 0 deletions
diff --git a/test-suite/ide/undo.v b/test-suite/ide/undo.v new file mode 100644 index 00000000..60c2e657 --- /dev/null +++ b/test-suite/ide/undo.v @@ -0,0 +1,79 @@ +(* Here are a sequences of scripts to test interactively with undo and + replay in coqide proof sessions *) + +(* Undoing arbitrary commands, as first step *) + +Theorem a : O=O. +Ltac f x := x. +assert True by trivial. +trivial. +Qed. + +(* Undoing arbitrary commands, as non-first step *) + +Theorem b : O=O. +assert True by trivial. +Ltac g x := x. +assert True by trivial. +trivial. +Qed. + +(* Undoing declarations, as first step *) +(* was bugged in 8.1 *) + +Theorem c : O=O. +Inductive T : Type := I. +trivial. +Qed. + +(* Undoing declarations, as first step *) +(* new in 8.2 *) + +Theorem d : O=O. +Definition e := O. +Definition f := O. +assert True by trivial. +trivial. +Qed. + +(* Undoing declarations, as non-first step *) +(* new in 8.2 *) + +Theorem h : O=O. +assert True by trivial. +Definition i := O. +Definition j := O. +assert True by trivial. +trivial. +Qed. + +(* Undoing declarations, interleaved with proof steps *) +(* new in 8.2 *) + +Theorem k : O=O. +assert True by trivial. +Definition l := O. +assert True by trivial. +Definition m := O. +assert True by trivial. +trivial. +Qed. + +(* Undoing declarations, interleaved with proof steps and commands *) +(* new in 8.2 *) + +Theorem n : O=O. +assert True by trivial. +Definition o := O. +Ltac h x := x. +assert True by trivial. +Focus. +Definition p := O. +assert True by trivial. +trivial. +Qed. + +(* Undoing declarations, not in proof *) + +Definition q := O. +Definition r := O. |