diff options
| -rw-r--r-- | src/flags.ads | 2 | ||||
| -rw-r--r-- | src/ghdldrv/ghdlsynth.adb | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/src/flags.ads b/src/flags.ads index 5ad2ece2b..a90a4fea0 100644 --- a/src/flags.ads +++ b/src/flags.ads @@ -104,7 +104,7 @@ package Flags is -- If set to true, it means that analyze is done for elaboration. -- The purpose is to avoid spurious warning "will be checked - -- at elaboration" + -- at elaboration". It will also create default binding. Flag_Elaborate : Boolean := False; -- If set, a default aspect entity aspect might be an outdated unit. diff --git a/src/ghdldrv/ghdlsynth.adb b/src/ghdldrv/ghdlsynth.adb index 233db4867..da37fed91 100644 --- a/src/ghdldrv/ghdlsynth.adb +++ b/src/ghdldrv/ghdlsynth.adb @@ -106,6 +106,8 @@ package body Ghdlsynth is Vhdl.Annotations.Flag_Synthesis := True; Common_Compile_Init (False); + -- Will elaborate. + Flags.Flag_Elaborate := True; Flags.Flag_Elaborate_With_Outdated := False; Flags.Flag_Only_Elab_Warnings := True; |