aboutsummaryrefslogtreecommitdiffstats
path: root/src/ortho/oread/tests/run_gvar.on
diff options
context:
space:
mode:
Diffstat (limited to 'src/ortho/oread/tests/run_gvar.on')
-rw-r--r--src/ortho/oread/tests/run_gvar.on10
1 files changed, 10 insertions, 0 deletions
diff --git a/src/ortho/oread/tests/run_gvar.on b/src/ortho/oread/tests/run_gvar.on
new file mode 100644
index 000000000..4efa46bca
--- /dev/null
+++ b/src/ortho/oread/tests/run_gvar.on
@@ -0,0 +1,10 @@
+TYPE __ghdl_index_type IS UNSIGNED (32);
+
+PUBLIC VAR v : __ghdl_index_type;
+
+PUBLIC FUNCTION main (a : __ghdl_index_type) RETURN __ghdl_index_type
+DECLARE
+BEGIN
+ v := a;
+ RETURN v +# 1;
+END;