From 20259a7f396e03c5bfce9237fd5732eb931e3d23 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Thu, 2 Jun 2016 20:27:06 +0200 Subject: Add testcase for issue67 --- testsuite/gna/issue67/fileerr.vhdl | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 testsuite/gna/issue67/fileerr.vhdl (limited to 'testsuite/gna/issue67/fileerr.vhdl') diff --git a/testsuite/gna/issue67/fileerr.vhdl b/testsuite/gna/issue67/fileerr.vhdl new file mode 100644 index 000000000..6ec380ece --- /dev/null +++ b/testsuite/gna/issue67/fileerr.vhdl @@ -0,0 +1,14 @@ +entity fileerr is +end fileerr; + +use std.textio.all; + +architecture behav of fileerr is +begin + process + file f : text; + begin + file_open (f, "bad-file-name"); + wait; + end process; +end behav; -- cgit v1.2.3