! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
-USING: accessors assocs continuations definitions init io
+USING: accessors assocs continuations definitions io
kernel math math.parser namespaces sequences sorting ;
IN: source-files.errors
SYMBOL: error-observers
-[
- V{ } clone error-observers set-global
-] "source-files.errors" add-startup-hook
+STARTUP-HOOK: [ V{ } clone error-observers set-global ]
: add-error-observer ( observer -- )
error-observers get push ;