diff options
Diffstat (limited to 'src/vhdl/simulate/simul-execution.adb')
| -rw-r--r-- | src/vhdl/simulate/simul-execution.adb | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/vhdl/simulate/simul-execution.adb b/src/vhdl/simulate/simul-execution.adb index 0958462a5..451889bc9 100644 --- a/src/vhdl/simulate/simul-execution.adb +++ b/src/vhdl/simulate/simul-execution.adb @@ -3831,9 +3831,7 @@ package body Simul.Execution is begin case Get_Identifier (Imp) is when Std_Names.Name_Get_Resolution_Limit => - Res := Create_I64_Value - (Ghdl_I64 - (Evaluation.Get_Physical_Value (Std_Package.Time_Base))); + Res := Create_I64_Value (1); when Std_Names.Name_Textio_Read_Real => Res := Create_F64_Value (File_Operation.Textio_Read_Real (Block.Objects (1))); |