From 3e36e6100f78e564642992801fae6fe75fd13d3d Mon Sep 17 00:00:00 2001 From: Paul Steckler Date: Tue, 6 Feb 2018 15:13:17 -0500 Subject: More detailed error messages for Canonical Structure, #6398 --- test-suite/output/ErrorInCanonicalStructures.out | 5 +++++ test-suite/output/ErrorInCanonicalStructures.v | 3 +++ test-suite/output/ErrorInCanonicalStructures2.out | 5 +++++ test-suite/output/ErrorInCanonicalStructures2.v | 3 +++ 4 files changed, 16 insertions(+) create mode 100644 test-suite/output/ErrorInCanonicalStructures.out create mode 100644 test-suite/output/ErrorInCanonicalStructures.v create mode 100644 test-suite/output/ErrorInCanonicalStructures2.out create mode 100644 test-suite/output/ErrorInCanonicalStructures2.v (limited to 'test-suite') diff --git a/test-suite/output/ErrorInCanonicalStructures.out b/test-suite/output/ErrorInCanonicalStructures.out new file mode 100644 index 0000000000..73da4f44f8 --- /dev/null +++ b/test-suite/output/ErrorInCanonicalStructures.out @@ -0,0 +1,5 @@ +File "stdin", line 3, characters 0-24: +Error: +Could not declare a canonical structure Foo. +Expected an instance of a record or structure. + diff --git a/test-suite/output/ErrorInCanonicalStructures.v b/test-suite/output/ErrorInCanonicalStructures.v new file mode 100644 index 0000000000..49597df6f7 --- /dev/null +++ b/test-suite/output/ErrorInCanonicalStructures.v @@ -0,0 +1,3 @@ +Record Foo := MkFoo { field1 : nat; field2 : nat -> nat }. + +Canonical Structure Foo. diff --git a/test-suite/output/ErrorInCanonicalStructures2.out b/test-suite/output/ErrorInCanonicalStructures2.out new file mode 100644 index 0000000000..63a2871b82 --- /dev/null +++ b/test-suite/output/ErrorInCanonicalStructures2.out @@ -0,0 +1,5 @@ +File "stdin", line 3, characters 0-24: +Error: +Could not declare a canonical structure bar. +Expected an instance of a record or structure. + diff --git a/test-suite/output/ErrorInCanonicalStructures2.v b/test-suite/output/ErrorInCanonicalStructures2.v new file mode 100644 index 0000000000..10ee177aaf --- /dev/null +++ b/test-suite/output/ErrorInCanonicalStructures2.v @@ -0,0 +1,3 @@ +Definition bar := 99. + +Canonical Structure bar. -- cgit v1.2.3