From 013948eaec75eedf45874ef1c421ada6f6fcab0b Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Thu, 16 Sep 2021 07:47:31 +0200 Subject: vhdl-utils: minor renaming for homogeneity --- src/vhdl/vhdl-utils.adb | 2 +- src/vhdl/vhdl-utils.ads | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'src/vhdl') 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; -- cgit v1.2.3