basis/bootstrap/finish-staging.factor

   1 USING: command-line init io kernel namespaces sequences system
   2 vocabs.loader ;
   3
   4 [
   5     boot
   6     do-startup-hooks
   7     (command-line) parse-command-line
   8     "run" get run
   9     output-stream get [ stream-flush ] when*
  10     0 exit
  11 ] set-startup-quot