diff options
Diffstat (limited to 'src/vhdl/iirs_utils.adb')
-rw-r--r-- | src/vhdl/iirs_utils.adb | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/vhdl/iirs_utils.adb b/src/vhdl/iirs_utils.adb index 5fa9987e5..4df49b424 100644 --- a/src/vhdl/iirs_utils.adb +++ b/src/vhdl/iirs_utils.adb @@ -51,6 +51,11 @@ package body Iirs_Utils is return Get_Kind (N) = Iir_Kind_Error; end Is_Error; + function Is_Overflow_Literal (N : Iir) return Boolean is + begin + return Get_Kind (N) = Iir_Kind_Overflow_Literal; + end Is_Overflow_Literal; + function Get_Operator_Name (Op : Iir) return Name_Id is begin case Get_Kind (Op) is |