factor/extra/tools/deploy/shaker/strip-debugger.factor

9 lines
149 B
Factor
Executable File

USING: kernel threads threads.private ;
IN: debugger
: print-error die ;
: error. die ;
M: thread error-in-thread ( error thread -- ) die 2drop ;