1 files changed, 21 insertions, 0 deletions
diff --git a/test/env.ssa b/test/env.ssa
new file mode 100644
index 0000000..7a7bb58
--- /dev/null
+++ b/test/env.ssa
@@ -0,0 +1,21 @@
+# sanity checks for env calls
+
+function l $epar(env %e, l %i) {
+@start
+	%x =l add %e, %i
+	ret %x
+}
+
+export function l $earg(l %a, l %b) {
+@start
+	%r1 =l call $epar(env %a, l %b)
+	# okay to call a regular function
+	# with an env argument
+	%r2 =l call $labs(env 113, l %r1)
+	ret %r2
+}
+
+# >>> driver
+# extern long earg(long, long);
+# int main(void) { return !(earg(2, -44) == 42); }
+# <<<