1 files changed, 17 insertions, 0 deletions
diff --git a/testsuite/gna/issue253/e2.vhdl b/testsuite/gna/issue253/e2.vhdl
new file mode 100644
index 000000000..c93cb3703
--- /dev/null
+++ b/testsuite/gna/issue253/e2.vhdl
@@ -0,0 +1,17 @@
+entity e2 is
+end entity;
+
+architecture a of e2 is
+  function get_left return natural is
+  begin
+    return 12;
+  end get_left;
+
+  constant l : natural := get_left;
+  subtype t is integer range 0 to l;
+  signal a : t;
+begin
+  assert FALSE report natural'image(a'subtype'left) severity NOTE;
+
+  assert FALSE report a'subtype'image(a) severity NOTE;
+end architecture;