diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-04-20 07:49:03 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-04-20 12:19:48 +0200 |
| commit | cb72a1834f160d95d026b7e466886fd95fd82146 (patch) | |
| tree | 87cd0fff5a8ce03b05b8e6a0a0129b60de90fe61 /src/ghdldrv | |
| parent | b6d42a577f4ee5f2084a165b0cdf66cadcc878a1 (diff) | |
| download | ghdl-cb72a1834f160d95d026b7e466886fd95fd82146.tar.gz ghdl-cb72a1834f160d95d026b7e466886fd95fd82146.tar.bz2 ghdl-cb72a1834f160d95d026b7e466886fd95fd82146.zip | |
types: introduce Direction_Type, which replaces Iir_Direction.
Global renaming.
Diffstat (limited to 'src/ghdldrv')
| -rw-r--r-- | src/ghdldrv/ghdlxml.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/ghdldrv/ghdlxml.adb b/src/ghdldrv/ghdlxml.adb index 3829dc0a8..46bffd9ea 100644 --- a/src/ghdldrv/ghdlxml.adb +++ b/src/ghdldrv/ghdlxml.adb @@ -394,9 +394,9 @@ package body Ghdlxml is when Type_Iir_Predefined_Functions => Put_Field (F, Image_Iir_Predefined_Functions (Get_Iir_Predefined_Functions (N, F))); - when Type_Iir_Direction => - Put_Field (F, Image_Iir_Direction - (Get_Iir_Direction (N, F))); + when Type_Direction_Type => + Put_Field (F, Image_Direction_Type + (Get_Direction_Type (N, F))); when Type_Iir_Int32 => Put_Field (F, Strip (Iir_Int32'Image (Get_Iir_Int32 (N, F)))); |