summary refs log tree commit diff stats
path: root/compiler
diff options
context:
space:
mode:
authorAraq <rumpf_a@web.de>2013-02-21 15:36:28 -0800
committerAraq <rumpf_a@web.de>2013-02-21 15:36:28 -0800
commitf1d5e8479b479cb58fd8bec5fffee84bb66af6dc (patch)
tree942c43ad1717bd0f46c4aa187bfe9d51beb47877 /compiler
parentdad664ca714ee681d22fb93344388fde2c9ff472 (diff)
parent9564e7069b2d11c8ad54a07e5676cc952c711114 (diff)
downloadNim-f1d5e8479b479cb58fd8bec5fffee84bb66af6dc.tar.gz
Merge pull request #280 from keitahaga/better-error-message
Slightly better error message
Diffstat (limited to 'compiler')
-rwxr-xr-xcompiler/commands.nim11
1 files changed, 8 insertions, 3 deletions
diff --git a/compiler/commands.nim b/compiler/commands.nim
index 1da632858..4dcf011f4 100755
--- a/compiler/commands.nim
+++ b/compiler/commands.nim
@@ -65,8 +65,13 @@ proc writeCommandLineUsage() =
     MsgWriteln(getCommandLineDesc())
     helpWritten = true
 
+proc addPrefix(switch: string): string =
+  if len(switch) == 1: result = "-" & switch
+  else: result = "--" & switch
+
 proc InvalidCmdLineOption(pass: TCmdLinePass, switch: string, info: TLineInfo) = 
-  LocalError(info, errInvalidCmdLineOption, switch)
+  if switch == " ": LocalError(info, errInvalidCmdLineOption, "-")
+  else: LocalError(info, errInvalidCmdLineOption, addPrefix(switch))
 
 proc splitSwitch(switch: string, cmd, arg: var string, pass: TCmdLinePass, 
                  info: TLineInfo) = 
@@ -98,10 +103,10 @@ proc ProcessOnOffSwitchG(op: TGlobalOptions, arg: string, pass: TCmdlinePass,
   else: LocalError(info, errOnOrOffExpectedButXFound, arg)
   
 proc ExpectArg(switch, arg: string, pass: TCmdLinePass, info: TLineInfo) = 
-  if arg == "": LocalError(info, errCmdLineArgExpected, switch)
+  if arg == "": LocalError(info, errCmdLineArgExpected, addPrefix(switch))
   
 proc ExpectNoArg(switch, arg: string, pass: TCmdLinePass, info: TLineInfo) = 
-  if arg != "": LocalError(info, errCmdLineNoArgExpected, switch)
+  if arg != "": LocalError(info, errCmdLineNoArgExpected, addPrefix(switch))
   
 proc ProcessSpecificNote(arg: string, state: TSpecialWord, pass: TCmdlinePass, 
                          info: TLineInfo) =