diff options
| author |  Jason Gross <jgross@mit.edu> | 2017-12-12 13:52:42 -0500 |
|---|---|---|
| committer | Jason Gross <jgross@mit.edu> | 2018-04-02 15:35:13 -0400 |
| commit | d9a7712b231f92882c2dccdc62d24ea3109abb0e (patch) | |
| tree | ce23d71c6e79f5d9a5f38ea42c648f70ee13b94e /test-suite | |
| parent | f29f8f80c8ad94576c7a36f3f638866c208338a0 (diff) | |
Fix #6404 - Print tactics called by ML tactics
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/output/bug5778.out | 4 | ||||
| -rw-r--r-- | test-suite/output/bug6404.out | 4 | ||||
| -rw-r--r-- | test-suite/output/bug6404.v | 7 |
3 files changed, 13 insertions, 2 deletions
diff --git a/test-suite/output/bug5778.out b/test-suite/output/bug5778.out index 91ceb1b58..d6056c509 100644 --- a/test-suite/output/bug5778.out +++ b/test-suite/output/bug5778.out @@ -1,4 +1,4 @@ The command has indeed failed with message: -In nested Ltac calls to "c", "abs" and "abstract b ltac:(())", last call -failed. +In nested Ltac calls to "c", "abs", "abstract b ltac:(())", +"b", "a", "pose (I : I)" and "(I : I)", last term evaluation failed. The term "I" has type "True" which should be Set, Prop or Type. diff --git a/test-suite/output/bug6404.out b/test-suite/output/bug6404.out new file mode 100644 index 000000000..05464755f --- /dev/null +++ b/test-suite/output/bug6404.out @@ -0,0 +1,4 @@ +The command has indeed failed with message: +In nested Ltac calls to "c", "abs", "transparent_abstract (tactic3)", +"b", "a", "pose (I : I)" and "(I : I)", last term evaluation failed. +The term "I" has type "True" which should be Set, Prop or Type. diff --git a/test-suite/output/bug6404.v b/test-suite/output/bug6404.v new file mode 100644 index 000000000..bbe6b1a00 --- /dev/null +++ b/test-suite/output/bug6404.v @@ -0,0 +1,7 @@ +Ltac a _ := pose (I : I). +Ltac b _ := a (). +Ltac abs _ := transparent_abstract b (). +Ltac c _ := abs (). +Goal True. + Fail c (). +Abort. |