diff options
Diffstat (limited to 'src/vhdl/vhdl-evaluation.adb')
| -rw-r--r-- | src/vhdl/vhdl-evaluation.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-evaluation.adb b/src/vhdl/vhdl-evaluation.adb index c7d0769ee..5f6ad409e 100644 --- a/src/vhdl/vhdl-evaluation.adb +++ b/src/vhdl/vhdl-evaluation.adb @@ -38,6 +38,7 @@ package body Vhdl.Evaluation is function Eval_Enum_To_String (Lit : Iir; Orig : Iir) return Iir; function Eval_Integer_Image (Val : Int64; Orig : Iir) return Iir; + function Eval_Floating_Image (Val : Fp64; Orig : Iir) return Iir; function Eval_Scalar_Compare (Left, Right : Iir) return Compare_Type; @@ -686,6 +687,8 @@ package body Vhdl.Evaluation is return Eval_Enum_To_String (Operand, Orig); when Iir_Predefined_Integer_To_String => return Eval_Integer_Image (Get_Value (Operand), Orig); + when Iir_Predefined_Floating_To_String => + return Eval_Floating_Image (Get_Fp_Value (Operand), Orig); when Iir_Predefined_Array_Char_To_String => -- LRM08 5.7 String representation |