diff options
| author | Pierre-Marie Pédrot | 2016-06-28 00:40:07 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2016-06-28 01:19:46 +0200 |
| commit | d98a590b0637ca50380d424ae638d001c79305b9 (patch) | |
| tree | e7e30f9380286f3192f2e11808d73ca4f2e0d4f1 | |
| parent | 97e6e937433d52eba1ab01863d19db8bd85f2bc3 (diff) | |
Adding a test-suite for the only printing flag.
| -rw-r--r-- | test-suite/output/onlyprinting.out | 2 | ||||
| -rw-r--r-- | test-suite/output/onlyprinting.v | 5 | ||||
| -rw-r--r-- | test-suite/success/onlyprinting.v | 7 |
3 files changed, 14 insertions, 0 deletions
diff --git a/test-suite/output/onlyprinting.out b/test-suite/output/onlyprinting.out new file mode 100644 index 0000000000..e0a30fcf6b --- /dev/null +++ b/test-suite/output/onlyprinting.out @@ -0,0 +1,2 @@ +0:-) 0 + : nat diff --git a/test-suite/output/onlyprinting.v b/test-suite/output/onlyprinting.v new file mode 100644 index 0000000000..1973385a0a --- /dev/null +++ b/test-suite/output/onlyprinting.v @@ -0,0 +1,5 @@ +Reserved Notation "x :-) y" (at level 50, only printing). + +Notation "x :-) y" := (plus x y). + +Check 0 + 0. diff --git a/test-suite/success/onlyprinting.v b/test-suite/success/onlyprinting.v new file mode 100644 index 0000000000..91a628d792 --- /dev/null +++ b/test-suite/success/onlyprinting.v @@ -0,0 +1,7 @@ +Notation "x ++ y" := (plus x y) (only printing). + +Fail Check 0 ++ 0. + +Notation "x + y" := (max x y) (only printing). + +Check (eq_refl : 42 + 18 = 60). |