aboutsummaryrefslogtreecommitdiff
path: root/tests/iii/function-byref/program.cps
diff options
context:
space:
mode:
Diffstat (limited to 'tests/iii/function-byref/program.cps')
-rw-r--r--tests/iii/function-byref/program.cps4
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/iii/function-byref/program.cps b/tests/iii/function-byref/program.cps
new file mode 100644
index 0000000..1cc89cb
--- /dev/null
+++ b/tests/iii/function-byref/program.cps
@@ -0,0 +1,4 @@
+// BYREF is procedure-only.
+FUNCTION Bad(BYREF X : INTEGER) RETURNS INTEGER
+ RETURN X
+ENDFUNCTION