Paste: error traceback
Author: | prunedtree |
Mode: | factor |
Date: | Wed, 3 Dec 2008 12:22:58 |
Plain Text |
( scratchpad ) :c
[ call -> stop ]
[ H{ } clone >n call -> ndrop ]
[ H{ } clone >n call -> ndrop ]
[ listen -> until-quit ]
[ swap >c call -> c> drop ]
[ read-quot -> [ ~quotation~ recover ] [ bye ] if* ]
[
[ handle-interactive ] keep -> swap
[ interactor-finish ] [ nip stream-read-quot ] if
]
[ >r call -> r> ]
[ tuck try-parse -> { ~array~ ~array~ ~quotation~ } cond ]
[ swap >c call -> c> drop ]
[ [ parse-lines in get ] with-compilation-unit -> in set ]
[ H{ } clone >n call -> ndrop ]
[
finish-compilation-unit -> updated-definitions
notify-definition-observers
]
[
63 getenv error-thread set-global
continuation -> error-continuation set-global rethrow
]
New Annotation