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

command-line: enable "quiet" mode for -e or script modes before .factor-rc is loaded

db4
Joe Groff 2011-08-19 17:26:47 -07:00
parent 9f93d4bff7
commit 237d0733c6
1 changed files with 11 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -92,16 +92,18 @@ from within Factor for more information.
: command-line-startup ( -- ) : command-line-startup ( -- )
(command-line) parse-command-line (command-line) parse-command-line
load-vocab-roots
run-user-init
"help" get "-help" get or "h" get or [ cli-usage ] [ "help" get "-help" get or "h" get or [ cli-usage ] [
"e" get script get or [ "e" get script get or "quiet" [
"e" get [ eval( -- ) ] when* load-vocab-roots
script get [ run-script ] when* run-user-init
] [
"run" get run "e" get script get or [
] if "e" get [ eval( -- ) ] when*
script get [ run-script ] when*
] [
"run" get run
] if
] with-variable
] if ] if
output-stream get [ stream-flush ] when* output-stream get [ stream-flush ] when*