diff options
| author | Tristan Gingold | 2014-12-29 08:20:50 +0100 |
|---|---|---|
| committer | Tristan Gingold | 2014-12-29 08:20:50 +0100 |
| commit | 17082aaf70426f2204b4259e45b1ca6e315bd439 (patch) | |
| tree | e92e12bf92c6b6c4e52d92981ce75d430750d225 /src/vhdl/iirs.adb.in | |
| parent | f77be8349e5c0d5924222af0c5fc059c6ae5b271 (diff) | |
| download | ghdl-17082aaf70426f2204b4259e45b1ca6e315bd439.tar.gz ghdl-17082aaf70426f2204b4259e45b1ca6e315bd439.tar.bz2 ghdl-17082aaf70426f2204b4259e45b1ca6e315bd439.zip | |
Rework string literals: store literals position.
Diffstat (limited to 'src/vhdl/iirs.adb.in')
| -rw-r--r-- | src/vhdl/iirs.adb.in | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/vhdl/iirs.adb.in b/src/vhdl/iirs.adb.in index d8e8bc0..481a355 100644 --- a/src/vhdl/iirs.adb.in +++ b/src/vhdl/iirs.adb.in @@ -213,10 +213,10 @@ package body Iirs is function Iir_Signal_Kind_To_Boolean is new Ada.Unchecked_Conversion (Source => Iir_Signal_Kind, Target => Boolean); - function Iir_To_String_Id is new Ada.Unchecked_Conversion - (Source => Iir, Target => String_Id); - function String_Id_To_Iir is new Ada.Unchecked_Conversion - (Source => String_Id, Target => Iir); + function Iir_To_String8_Id is new Ada.Unchecked_Conversion + (Source => Iir, Target => String8_Id); + function String8_Id_To_Iir is new Ada.Unchecked_Conversion + (Source => String8_Id, Target => Iir); function Iir_To_Int32 is new Ada.Unchecked_Conversion (Source => Iir, Target => Int32); |