diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-04-06 18:41:34 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-04-06 20:10:59 +0200 |
| commit | dde006868a8864a9152ad396c519ddc4cbe9cfd8 (patch) | |
| tree | ce86c8986bc1add3d2850d39d26cad09538d908d | |
| parent | 836edf21a42e2a7a0b085214817ae6b1d2699237 (diff) | |
| download | ghdl-dde006868a8864a9152ad396c519ddc4cbe9cfd8.tar.gz ghdl-dde006868a8864a9152ad396c519ddc4cbe9cfd8.tar.bz2 ghdl-dde006868a8864a9152ad396c519ddc4cbe9cfd8.zip | |
ghdl -s: do not perform analysis in case of parse error. Fix #1196
| -rw-r--r-- | src/ghdldrv/ghdllocal.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ghdldrv/ghdllocal.adb b/src/ghdldrv/ghdllocal.adb index 45a0152fa..1f70ceae1 100644 --- a/src/ghdldrv/ghdllocal.adb +++ b/src/ghdldrv/ghdllocal.adb @@ -862,7 +862,7 @@ package body Ghdllocal is Put_Line (":"); end if; Design_File := Vhdl.Sem_Lib.Load_File_Name (Id); - if Design_File = Null_Iir then + if Errorout.Nbr_Errors /= 0 then return; end if; |