QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-02 03:50:36 +00:00
Code Issues Releases Wiki Activity

Merge pull request #44 from ebourg/help-options

Browse source 
GNU style help options
This commit is contained in:
Fellippe Heitor 2018-05-22 22:10:11 -03:00 committed by GitHub
parent 306ad0f676 648d16a2c0
commit 5d073ef9cc
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
source/qb64.bas
View file

@ -12668,7 +12668,7 @@ FUNCTION ParseCMDLineArgs$ ()
'in which case they're simply asking for trouble).
FOR i = 1 TO _COMMANDCOUNT
token$ = COMMAND$(i)
IF LCASE$(token$) = "-help" OR LCASE$(token$) = "/help" THEN token$ = "-?"
IF LCASE$(token$) = "-help" OR LCASE$(token$) = "--help" OR LCASE$(token$) = "-h" OR LCASE$(token$) = "/help" THEN token$ = "-?"
SELECT CASE LCASE$(LEFT$(token$, 2))
CASE "-?" 'Command-line help
_DEST _CONSOLE