replace --advanced by --fullhelp; refs #7621

This commit is contained in:
Andreas Rumpf
2018-04-20 08:45:03 +02:00
parent 262aafa0a9
commit 9cc8fec370
2 changed files with 12 additions and 1 deletions

View File

@@ -77,6 +77,14 @@ proc writeAdvancedUsage(pass: TCmdLinePass) =
{msgStdout})
msgQuit(0)
proc writeFullhelp(pass: TCmdLinePass) =
if pass == passCmd1:
msgWriteln(`%`(HelpMessage, [VersionAsString,
platform.OS[platform.hostOS].name,
CPU[platform.hostCPU].name]) & Usage & AdvancedUsage,
{msgStdout})
msgQuit(0)
proc writeVersionInfo(pass: TCmdLinePass) =
if pass == passCmd1:
msgWriteln(`%`(HelpMessage, [VersionAsString,
@@ -611,6 +619,9 @@ proc processSwitch(switch, arg: string, pass: TCmdLinePass, info: TLineInfo;
of "advanced":
expectNoArg(switch, arg, pass, info)
writeAdvancedUsage(pass)
of "fullhelp":
expectNoArg(switch, arg, pass, info)
writeFullhelp(pass)
of "help", "h":
expectNoArg(switch, arg, pass, info)
helpOnError(pass)

View File

@@ -36,7 +36,7 @@ Options:
--app:console|gui|lib|staticlib
generate a console app|GUI app|DLL|static library
-r, --run run the compiled program with given arguments
--advanced show advanced command line switches
--fullhelp show all command line switches
-h, --help show this help
Note, single letter options that take an argument require a colon. E.g. -p:PATH.