diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-06-20 19:01:57 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-06-20 19:01:57 +0200 |
| commit | 6f7777c99483cdc10d5eafe7bd47e752a34f862a (patch) | |
| tree | 079030e609e22233a50f90a4edcb5bbd6a6b96d9 /src/errorout.adb | |
| parent | e3945ec7d3a10888c42505343600e946cf960da2 (diff) | |
| download | ghdl-6f7777c99483cdc10d5eafe7bd47e752a34f862a.tar.gz ghdl-6f7777c99483cdc10d5eafe7bd47e752a34f862a.tar.bz2 ghdl-6f7777c99483cdc10d5eafe7bd47e752a34f862a.zip | |
errorout-memory: avoid a crash after the limit is
Diffstat (limited to 'src/errorout.adb')
| -rw-r--r-- | src/errorout.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/errorout.adb b/src/errorout.adb index 98a844c7b..5e706c475 100644 --- a/src/errorout.adb +++ b/src/errorout.adb @@ -202,7 +202,7 @@ package body Errorout is and then New_Id = Msgid_Error then if Nbr_Errors = Max_Nbr_Errors then - -- Limit reached. Emit a message. + -- Limit reached. Emit a message on the first message. Report_Handler.Error_Start (Err => (Option, Msgid_Error, No_Source_File_Entry, 0, 0, 0)); |