diff options
Diffstat (limited to 'testsuite/gna/bug029/repro1.vhdl')
-rw-r--r-- | testsuite/gna/bug029/repro1.vhdl | 42 |
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; |