From f10b2021cce7bca2d0234e9ab73be47cdc3bf6fc Mon Sep 17 00:00:00 2001 From: Hugo Herbelin Date: Wed, 19 Aug 2020 03:38:38 +0200 Subject: Yet other tactic error location fixes (see PR#12223 and PR#12774). When calling an Ltac function, add specific locations when interpreting the function, when interpreting the arguments and when executating the call (in a TacArg). --- test-suite/output/ErrorLocation_12774_3.out | 3 +++ test-suite/output/ErrorLocation_12774_3.v | 4 ++++ test-suite/output/Error_msg_diffs.out | 2 +- 3 files changed, 8 insertions(+), 1 deletion(-) create mode 100644 test-suite/output/ErrorLocation_12774_3.out create mode 100644 test-suite/output/ErrorLocation_12774_3.v (limited to 'test-suite') diff --git a/test-suite/output/ErrorLocation_12774_3.out b/test-suite/output/ErrorLocation_12774_3.out new file mode 100644 index 0000000000..dbd3dbd1e2 --- /dev/null +++ b/test-suite/output/ErrorLocation_12774_3.out @@ -0,0 +1,3 @@ +File "stdin", line 3, characters 0-1: +Error: No product even after head-reduction. + diff --git a/test-suite/output/ErrorLocation_12774_3.v b/test-suite/output/ErrorLocation_12774_3.v new file mode 100644 index 0000000000..c624402a81 --- /dev/null +++ b/test-suite/output/ErrorLocation_12774_3.v @@ -0,0 +1,4 @@ +Ltac f := auto; intro. +Goal False. +f. +Abort. diff --git a/test-suite/output/Error_msg_diffs.out b/test-suite/output/Error_msg_diffs.out index 3e337e892d..2645524a70 100644 --- a/test-suite/output/Error_msg_diffs.out +++ b/test-suite/output/Error_msg_diffs.out @@ -1,4 +1,4 @@ -File "stdin", line 32, characters 0-12: +File "stdin", line 32, characters 0-11: Error: In environment T : Type -- cgit v1.2.3