steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

command-line: if run is specified first non-param starts the command-line.

db4
John Benediktsson 2012-08-13 16:42:56 -07:00
parent dda43cc647
commit 36a4a59efc
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/command-line/command-line.factor
View File

@ -66,7 +66,10 @@ SYMBOL: command-line
[ command-line off script off ] [ [ command-line off script off ] [
unclip "-" ?head unclip "-" ?head
[ param parse-command-line ] [ param parse-command-line ]
[ script set command-line set ] if [
"run" get-global [ prefix f ] when
script set command-line set
] if
] if-empty ; ] if-empty ;
SYMBOL: main-vocab-hook SYMBOL: main-vocab-hook