diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-05-28 08:00:05 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-05-28 08:00:05 +0200 |
commit | ed658a2907c3344b62f66bd0d44769afcef00723 (patch) | |
tree | 865ad957b98601a24815ddb4279f3a1fee967707 /src | |
parent | 519b5820ff6364bbfe87d8ff898cd209e7209c47 (diff) | |
download | ghdl-ed658a2907c3344b62f66bd0d44769afcef00723.tar.gz ghdl-ed658a2907c3344b62f66bd0d44769afcef00723.tar.bz2 ghdl-ed658a2907c3344b62f66bd0d44769afcef00723.zip |
vhdl: time resolution is fs for auto in vhdl 87
Diffstat (limited to 'src')
-rw-r--r-- | src/vhdl/vhdl-std_package.adb | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-std_package.adb b/src/vhdl/vhdl-std_package.adb index db6139622..8012f74e1 100644 --- a/src/vhdl/vhdl-std_package.adb +++ b/src/vhdl/vhdl-std_package.adb @@ -1346,6 +1346,12 @@ package body Vhdl.Std_Package is function Get_Minimal_Time_Resolution return Character is begin + -- In vhdl87, time units are locally static, so they are evaluated + -- during analysis. The units cannot be changed later. + if Vhdl_Std = Vhdl_87 then + return 'f'; + end if; + if Get_Use_Flag (Time_Fs_Unit) then return 'f'; end if; |