summaryrefslogtreecommitdiff
path: root/testsuite/gna/bug029/repro1.vhdl
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/gna/bug029/repro1.vhdl')
-rw-r--r--testsuite/gna/bug029/repro1.vhdl42
1 files changed, 42 insertions, 0 deletions
diff --git a/testsuite/gna/bug029/repro1.vhdl b/testsuite/gna/bug029/repro1.vhdl
new file mode 100644
index 0000000..594133d
--- /dev/null
+++ b/testsuite/gna/bug029/repro1.vhdl
@@ -0,0 +1,42 @@
+package foo is
+ function some_foo return integer;
+ function some_fum return integer;
+ function some_foe (x, y, w: integer) return integer;
+ function some_fee (x, y, w: integer) return integer;
+end package;
+
+package body foo is
+ function some_foo return integer is
+
+ begin
+ return -1;
+ return 0;
+ end function;
+
+ function some_fum return integer is
+ variable a: integer := -1;
+ variable b: integer := 0;
+ begin
+ return a;
+ return b;
+ end function;
+
+ function some_foe (x, y, w: integer) return integer is
+ variable a: integer := -1;
+ variable b: integer := 0;
+ begin
+ return a;
+ return b;
+ end function;
+
+ function some_fee (x, y, w: integer) return integer is
+ variable a: integer := -1;
+ variable b: integer := 0;
+ begin
+ a := x + w;
+ b := y + w;
+ return a;
+ return b;
+ end function;
+
+end package body;