diff options
Diffstat (limited to 'src/vhdl/vhdl-std_package.adb')
-rw-r--r-- | src/vhdl/vhdl-std_package.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-std_package.adb b/src/vhdl/vhdl-std_package.adb index 3c6852c23..40d290891 100644 --- a/src/vhdl/vhdl-std_package.adb +++ b/src/vhdl/vhdl-std_package.adb @@ -1060,7 +1060,8 @@ package body Vhdl.Std_Package is Pure := True; when Vhdl_93 | Vhdl_00 - | Vhdl_08 => + | Vhdl_08 + | Vhdl_19 => Pure := False; end case; Set_Pure_Flag (Function_Now, Pure); |