diff options
| author | Tristan Gingold <tgingold@free.fr> | 2018-08-13 05:53:03 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2018-08-13 05:53:03 +0200 |
| commit | ded2825eb086493655d90b499c3dcf3abd9e5867 (patch) | |
| tree | 996cb37fa62ef2db632d628c51127f36c71fedb5 /testsuite/gna/issue634/top.vhdl | |
| parent | cefd5a01505eb6c0b8c4acdec36d02b8f8bc2de4 (diff) | |
| download | ghdl-ded2825eb086493655d90b499c3dcf3abd9e5867.tar.gz ghdl-ded2825eb086493655d90b499c3dcf3abd9e5867.tar.bz2 ghdl-ded2825eb086493655d90b499c3dcf3abd9e5867.zip | |
Add reprocedure for #634
Diffstat (limited to 'testsuite/gna/issue634/top.vhdl')
| -rw-r--r-- | testsuite/gna/issue634/top.vhdl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/testsuite/gna/issue634/top.vhdl b/testsuite/gna/issue634/top.vhdl new file mode 100644 index 000000000..0dd7a47a2 --- /dev/null +++ b/testsuite/gna/issue634/top.vhdl @@ -0,0 +1,15 @@ +use std.textio.all; + +entity top_ent is +end entity; + +architecture default of top_ent is + file fh : text; +begin + process + begin + if endfile(fh) then + null; + end if; + end process; +end architecture; |