aboutsummaryrefslogtreecommitdiff
path: root/src/testsuite/compiler/1872404.spad
diff options
context:
space:
mode:
Diffstat (limited to 'src/testsuite/compiler/1872404.spad')
-rw-r--r--src/testsuite/compiler/1872404.spad9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/testsuite/compiler/1872404.spad b/src/testsuite/compiler/1872404.spad
new file mode 100644
index 00000000..591bca7b
--- /dev/null
+++ b/src/testsuite/compiler/1872404.spad
@@ -0,0 +1,9 @@
+-- Contributed by Luke Wagner
+)abbrev domain TEST Test
+Test() : with
+ foo : INT -> INT
+ == add
+ Rep := Union(blah, INT)
+ foo i ==
+ i
+