diff options
| author |  Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2014-09-17 01:11:52 +0200 |
|---|---|---|
| committer | Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2014-09-17 01:11:52 +0200 |
| commit | d34e1eed232c84590ddb80d70db9f7f7cf13584a (patch) | |
| tree | 75782f47ebe381d84ea66409569167f9ba229c78 /test-suite/bugs/closed/3624.v | |
| parent | c5ecebf6fefbaa673dda506175a2aa4a69d79807 (diff) | |
Update test-suite files after last commit. Add a file for rewrite_strat
examples.
Diffstat (limited to 'test-suite/bugs/closed/3624.v')
| -rw-r--r-- | test-suite/bugs/closed/3624.v | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/3624.v b/test-suite/bugs/closed/3624.v new file mode 100644 index 000000000..a05d5eb21 --- /dev/null +++ b/test-suite/bugs/closed/3624.v @@ -0,0 +1,11 @@ +Set Implicit Arguments. +Module NonPrim. + Class foo (m : Set) := { pf : m = m }. + Notation pf' m := (pf (m := m)). +End NonPrim. + +Module Prim. + Set Primitive Projections. + Class foo (m : Set) := { pf : m = m }. + Notation pf' m := (pf (m:=m)). (* Wrong argument name: m. *) +End Prim.
\ No newline at end of file |