diff options
| -rw-r--r-- | src/vhdl/vhdl-utils.adb | 2 | ||||
| -rw-r--r-- | src/vhdl/vhdl-utils.ads | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/vhdl/vhdl-utils.adb b/src/vhdl/vhdl-utils.adb index e834c827b..95261405d 100644 --- a/src/vhdl/vhdl-utils.adb +++ b/src/vhdl/vhdl-utils.adb @@ -1990,7 +1990,7 @@ package body Vhdl.Utils is end case; end Get_File_Signature; - function Get_Source_Identifier (Decl : Node) return Name_Id + function Get_Source_Identifier (Decl : Iir) return Name_Id is use Files_Map; use Name_Table; diff --git a/src/vhdl/vhdl-utils.ads b/src/vhdl/vhdl-utils.ads index 455a0304b..f51599cdf 100644 --- a/src/vhdl/vhdl-utils.ads +++ b/src/vhdl/vhdl-utils.ads @@ -425,7 +425,7 @@ package Vhdl.Utils is -- appears in the source file. -- Not useful for analysis as VHDL is case insensitive, but could be -- useful for error messages or tooling. - function Get_Source_Identifier (Decl : Node) return Name_Id; + function Get_Source_Identifier (Decl : Iir) return Name_Id; -- IIR wrapper around Get_HDL_Node/Set_HDL_Node. function Get_HDL_Node (N : PSL_Node) return Iir; |