1 files changed, 7 insertions, 0 deletions
diff --git a/test/programs/record.cps b/test/programs/record.cps
new file mode 100644
index 0000000..fe82668
--- /dev/null
+++ b/test/programs/record.cps
@@ -0,0 +1,7 @@
+RECORD([(INT 1, OFFp 0), (INT 2, OFFp 0)], record,
+  SELECT(0, VAR one, record,
+    SELECT(1, VAR two, record,
+      PRIMOP(+, [VAR one, VAR two], [result], [])
+    )
+  )
+)
+\ No newline at end of file