Paste: finish-bootstrap.factor

Author: kingdon
Mode: factor
Date: Mon, 14 Sep 2009 02:47:50
Plain Text | 
USING: init command-line debugger system continuations
namespaces eval kernel vocabs.loader io ;

[
    boot
    do-init-hooks
    [
        (command-line) parse-command-line
        load-vocab-roots
        run-user-init
        "e" get [ eval( -- ) ] when*
        ignore-cli-args? not script get and
        [ run-script ] [ "run" get run ] if*
        output-stream get [ stream-flush ] when*
        0 exit
    ] [ print-error 1 exit ] recover
] set-boot-quot

! Please invite Kingdon to work for pay!
! yebyen@csh.rit.edu -- yebyen@gmail.com

New Annotation

Summary:
Author:
Mode:
Body: