diff options
| author | Ondrej Ille <ondrej.ille@gmail.com> | 2021-04-22 19:54:34 +0200 |
|---|---|---|
| committer | tgingold <tgingold@users.noreply.github.com> | 2021-04-22 20:30:57 +0200 |
| commit | 79858ee06b24d072be39d52d6efc38f212369f41 (patch) | |
| tree | b85348818e93badc67f327b5215630ae799fd6e7 /src/options.adb | |
| parent | e219923ae60f0b172d4d5f292af2bf847003f2d2 (diff) | |
| download | ghdl-79858ee06b24d072be39d52d6efc38f212369f41.tar.gz ghdl-79858ee06b24d072be39d52d6efc38f212369f41.tar.bz2 ghdl-79858ee06b24d072be39d52d6efc38f212369f41.zip | |
src: Minor clarifications in Error messages for Warning and VHDL std options.
Diffstat (limited to 'src/options.adb')
| -rw-r--r-- | src/options.adb | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/src/options.adb b/src/options.adb index 6fa3df36e..3191cd575 100644 --- a/src/options.adb +++ b/src/options.adb @@ -82,7 +82,7 @@ package body Options is return Option_Ok; end if; end loop; - Error_Msg_Option ("unknown warning identifier"); + Error_Msg_Option ("unknown warning identifier: " & Opt); return Option_Err; end if; @@ -101,7 +101,7 @@ package body Options is end if; -- Unknown warning. - Error_Msg_Option ("unknown warning identifier"); + Error_Msg_Option ("unknown warning identifier: " & Opt); return Option_Err; end Option_Warning; @@ -124,7 +124,8 @@ package body Options is elsif Opt (7 .. 8) = "08" then Vhdl_Std := Vhdl_08; else - Error_Msg_Option ("unknown language standard"); + Error_Msg_Option ("unknown language standard: " & Opt (7 ..8) & + ". Should be one of: 87, 93, 02, 08"); return Option_Err; end if; elsif Opt'Length = 9 and then Opt (7 .. 9) = "93c" then @@ -132,7 +133,8 @@ package body Options is Flag_Relaxed_Rules := True; Flag_Relaxed_Files87 := True; else - Error_Msg_Option ("unknown language standard"); + Error_Msg_Option ("unknown language standard. " & + "Should be one of: 87, 93, 02, 08"); return Option_Err; end if; elsif Opt'Length = 5 and then Opt (1 .. 5) = "--ams" then |