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