ghdllocal, ghdlxml: adjust after previous commit; fix #2349

2 files changed, 6 insertions, 0 deletions

diff --git a/src/ghdldrv/ghdllocal.adb b/src/ghdldrv/ghdllocal.adb
index 756589602..e7e8f5261 100644
--- a/src/ghdldrv/ghdllocal.adb
+++ b/src/ghdldrv/ghdllocal.adb
@@ -1044,6 +1044,9 @@ package body Ghdllocal is
    is
       Error : Boolean;
    begin
+      --  Allow syntax checking with simply imported dependencies.
+      Flags.Flag_Elaborate_With_Outdated := True;
+
       Analyze_Files (Args, False, Error);
       if Error xor Cmd.Flag_Expect_Failure then
          raise Errorout.Compilation_Error;
diff --git a/src/ghdldrv/ghdlxml.adb b/src/ghdldrv/ghdlxml.adb
index 8ab10db86..2729f0b1b 100644
--- a/src/ghdldrv/ghdlxml.adb
+++ b/src/ghdldrv/ghdlxml.adb
@@ -18,6 +18,7 @@ with GNAT.OS_Lib; use GNAT.OS_Lib;
 with Simple_IO; use Simple_IO;
 
 with Types; use Types;
+with Flags;
 with Name_Table; use Name_Table;
 with Vhdl.Nodes_Meta; use Vhdl.Nodes_Meta;
 with Files_Map;
@@ -557,6 +558,8 @@ package body Ghdlxml is
          return;
       end if;
 
+      Flags.Flag_Elaborate_With_Outdated := True;
+
       --  Parse all files.
       for I in Files'Range loop
          Id := Get_Identifier (Files_Name (I).all);