diff options
author | Tristan Gingold <tgingold@free.fr> | 2022-07-16 08:38:56 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2022-07-16 08:38:56 +0200 |
commit | b11ff2745c951f5beaa8e0eb06dd367a9341f18d (patch) | |
tree | 68296b14709923c794f7e7e2ca2297c196539d3c /testsuite/gna/issue2134/repro1.vhdl | |
parent | cfd13a0983b26c984444a7d2759ac577d2aa1d74 (diff) | |
download | ghdl-b11ff2745c951f5beaa8e0eb06dd367a9341f18d.tar.gz ghdl-b11ff2745c951f5beaa8e0eb06dd367a9341f18d.tar.bz2 ghdl-b11ff2745c951f5beaa8e0eb06dd367a9341f18d.zip |
testsuite/gna: add a test for #2134
Diffstat (limited to 'testsuite/gna/issue2134/repro1.vhdl')
-rw-r--r-- | testsuite/gna/issue2134/repro1.vhdl | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/testsuite/gna/issue2134/repro1.vhdl b/testsuite/gna/issue2134/repro1.vhdl new file mode 100644 index 000000000..0e4943295 --- /dev/null +++ b/testsuite/gna/issue2134/repro1.vhdl @@ -0,0 +1,22 @@ +entity repro1 is +end; + +architecture behav of repro1 is + type protected_t is protected + impure function some_function return natural; + end protected; + + type protected_t is protected body + variable i : integer; + impure function some_function return natural is + begin + return i; + end function; + end protected body; + + shared variable si : protected_t; + + attribute some_value : integer; + attribute some_value of si : variable is 1; +begin +end behav; |