diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-04-03 11:43:42 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-04-06 20:10:54 +0200 |
commit | 77d71c72f10cb8a1779dfddcf2a5053c728300ec (patch) | |
tree | a6adcc528dc1845e16cf7b4c992a5384a5cf6f1a /src/ghdldrv | |
parent | 6ccedcb1f76081df973776f0e4e6909e21de8760 (diff) | |
download | ghdl-77d71c72f10cb8a1779dfddcf2a5053c728300ec.tar.gz ghdl-77d71c72f10cb8a1779dfddcf2a5053c728300ec.tar.bz2 ghdl-77d71c72f10cb8a1779dfddcf2a5053c728300ec.zip |
vhdl: add scalar_size. Size of scalar types is computed during analysis.
Diffstat (limited to 'src/ghdldrv')
-rw-r--r-- | src/ghdldrv/ghdlxml.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/ghdldrv/ghdlxml.adb b/src/ghdldrv/ghdlxml.adb index 10e1644ef..5a201955d 100644 --- a/src/ghdldrv/ghdlxml.adb +++ b/src/ghdldrv/ghdlxml.adb @@ -371,6 +371,8 @@ package body Ghdlxml is when Type_Iir_Staticness => Put_Field (F, Image_Iir_Staticness (Get_Iir_Staticness (N, F))); + when Type_Scalar_Size => + Put_Field (F, Image_Scalar_Size (Get_Scalar_Size (N, F))); when Type_Date_State_Type => Put_Field (F, Image_Date_State_Type (Get_Date_State_Type (N, F))); |