diff options
Diffstat (limited to 'test-suite/failure/circular_subtyping2.v')
| -rw-r--r-- | test-suite/failure/circular_subtyping2.v | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/failure/circular_subtyping2.v b/test-suite/failure/circular_subtyping2.v new file mode 100644 index 00000000..3bacdc65 --- /dev/null +++ b/test-suite/failure/circular_subtyping2.v @@ -0,0 +1,8 @@ +(*subtyping verification in presence of pseudo-circularity at functor application *) +Module Type S. End S. +Module Type T. Declare Module M:S. End T. +Module N:S. End N. + +Module F (X:S) (Y:T with Module M:=X). End F. + +Module G := F N N.
\ No newline at end of file |