(define sys:livecoding-error-hook? (lambda (on?) (if on? (set! *error-hook* '()) (set! *error-hook* throw))))