File reproducer for ticket 43 and 44.

1 files changed, 13 insertions, 0 deletions

diff --git a/testsuite/gna/ticket44/file2.vhd b/testsuite/gna/ticket44/file2.vhd
new file mode 100644
index 0000000..a9566d5
--- /dev/null
+++ b/testsuite/gna/ticket44/file2.vhd
@@ -0,0 +1,13 @@
+package body other_pkg is
+  procedure other_proc (
+    variable result : out boolean) is
+  begin
+  end;
+
+  impure function other_proc
+    return boolean is
+    variable result : boolean;
+  begin
+    return result;
+  end function other_proc;
+end package body other_pkg;