diff options
| author | Brian Drummond <brian@shapes.demon.co.uk> | 2013-12-13 13:06:52 +0000 |
|---|---|---|
| committer | Brian Drummond <brian@shapes.demon.co.uk> | 2013-12-13 13:06:52 +0000 |
| commit | d396e3c30c4dd5892553932b4078b7ab411679f5 (patch) | |
| tree | c1b8218d47ee301a6948b34c067d39d4e6e5bca7 /translate/grt/grt-disp_rti.adb | |
| parent | 922c6333d93cf59261d9beab603b2ac5e2e19319 (diff) | |
| download | ghdl-d396e3c30c4dd5892553932b4078b7ab411679f5.tar.gz ghdl-d396e3c30c4dd5892553932b4078b7ab411679f5.tar.bz2 ghdl-d396e3c30c4dd5892553932b4078b7ab411679f5.zip | |
Patch for multiple 'image and 'value attribute problems, mainly missing functionality. Resolves bugs 7751, 20255
Diffstat (limited to 'translate/grt/grt-disp_rti.adb')
| -rw-r--r-- | translate/grt/grt-disp_rti.adb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/translate/grt/grt-disp_rti.adb b/translate/grt/grt-disp_rti.adb index c92677564..d6f891a9c 100644 --- a/translate/grt/grt-disp_rti.adb +++ b/translate/grt/grt-disp_rti.adb @@ -253,8 +253,10 @@ package body Grt.Disp_Rti is Disp_Record_Value (Stream, To_Ghdl_Rtin_Type_Record_Acc (Rti), Ctxt, Obj, Is_Sig); when others => - Put (Stream, "??"); + Put (Stream, "Unknown Rti Kind : "); + Disp_Kind(Rti.Kind); end case; + Put_Line(":"); end Disp_Value; procedure Disp_Kind (Kind : Ghdl_Rtik) is |