aboutsummaryrefslogtreecommitdiff
path: root/src/testsuite/compiler
diff options
context:
space:
mode:
Diffstat (limited to 'src/testsuite/compiler')
-rw-r--r--src/testsuite/compiler/1872445.spad7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/testsuite/compiler/1872445.spad b/src/testsuite/compiler/1872445.spad
new file mode 100644
index 00000000..93541dcf
--- /dev/null
+++ b/src/testsuite/compiler/1872445.spad
@@ -0,0 +1,7 @@
+-- Contributed by Luke Wagner
+)abbrev domain TEST Test
+Test(): with
+ foo: Integer -> Integer
+ == add
+ Rep := Record(a: Integer, b: Test)
+ foo i == i