break circularity

basis/command-line/command-line.factor

@@ -102,3 +102,5 @@ SYMBOL: main-vocab-hook
     H{ } user-init-errors set-global
     default-cli-args
 ] "command-line" add-startup-hook
+
+{ "debugger" "command-line" } "command-line.debugger" require-when

basis/command-line/debugger/debugger.factor

@@ -0,0 +1,6 @@
+USING: accessors debugger io kernel make math.parser
+prettyprint command-line summary ;
+IN: command-line.debugger
+
+M: user-init-error error.
+    error>> error. ;

basis/source-files/errors/debugger/debugger.factor

@@ -1,5 +1,6 @@
+! (c)2010 Joe Groff bsd license
 USING: accessors debugger io kernel make math.parser
-prettyprint source-files.errors command-line summary ;
+prettyprint source-files.errors summary ;
 IN: source-files.errors.debugger
 
 CONSTANT: +listener-input+ "<Listener input>"
@@ -17,6 +18,3 @@ M: source-file-error error.
     [ asset>> [ "Asset: " write short. nl ] when* ]
     [ error>> error. ]
     tri ;
-
-M: user-init-error error.
-    error>> error. ;