diff options
Diffstat (limited to 'src/vhdl/translate/trans-helpers2.adb')
| -rw-r--r-- | src/vhdl/translate/trans-helpers2.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-helpers2.adb b/src/vhdl/translate/trans-helpers2.adb index c8da472c7..9a4b28552 100644 --- a/src/vhdl/translate/trans-helpers2.adb +++ b/src/vhdl/translate/trans-helpers2.adb @@ -97,7 +97,7 @@ package body Trans.Helpers2 is raise Internal_Error; end if; Image (Str); - return Create_String (Name_Buffer (1 .. Name_Length), Id, Storage); + return Create_String (Nam_Buffer (1 .. Nam_Length), Id, Storage); end Create_String; function Create_String_Len (Str : String; Id : O_Ident) return O_Cnode |