diff options
Diffstat (limited to 'src/ghdldrv/ghdllocal.adb')
| -rw-r--r-- | src/ghdldrv/ghdllocal.adb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/ghdldrv/ghdllocal.adb b/src/ghdldrv/ghdllocal.adb index 0e99d7233..8570144ee 100644 --- a/src/ghdldrv/ghdllocal.adb +++ b/src/ghdldrv/ghdllocal.adb @@ -1735,7 +1735,9 @@ package body Ghdllocal is declare Sec : constant String_Access := Args (Next_Arg); begin - if Sec (Sec'First) /= '-' then + if Sec (Sec'First) /= '-' + and then Sec (Sec'First) /= '+' + then Sec_Id := Convert_Name (Sec.all); Next_Arg := Args'First + 2; if Sec_Id = Null_Identifier then |