diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-08-19 21:02:24 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-08-20 04:13:12 +0200 |
| commit | fcd68928a4366c35748f488f949d5eada82998dd (patch) | |
| tree | 1293db893401181d17da9a3fb92a61401e09c882 /src/vhdl/vhdl-parse.adb | |
| parent | 008d54327842b999f3ea442de5d9e312ab94b5f1 (diff) | |
| download | ghdl-fcd68928a4366c35748f488f949d5eada82998dd.tar.gz ghdl-fcd68928a4366c35748f488f949d5eada82998dd.tar.bz2 ghdl-fcd68928a4366c35748f488f949d5eada82998dd.zip | |
synth: handle verification units.
Diffstat (limited to 'src/vhdl/vhdl-parse.adb')
| -rw-r--r-- | src/vhdl/vhdl-parse.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-parse.adb b/src/vhdl/vhdl-parse.adb index 95b736592..95c479a57 100644 --- a/src/vhdl/vhdl-parse.adb +++ b/src/vhdl/vhdl-parse.adb @@ -8608,6 +8608,7 @@ package body Vhdl.Parse is Res : Iir; begin Res := Create_Iir (Iir_Kind_Psl_Assert_Directive); + Set_Location (Res); -- Accept PSL tokens if Flags.Vhdl_Std >= Vhdl_08 then |