* Unhandled exceptions are now sent to (standard-error-port) instead

of (console-output-port).

scheme/ikarus.cafe.ss

@@ -72,7 +72,7 @@ description:
             (lambda (con)
               (reset-input-port! (console-input-port))
               (flush-output-port (console-output-port))
-              (display "Unhandled exception\n")
+              (display "Unhandled exception\n" (standard-error-port))
               (print-condition con)
               (k (void)))
             (lambda ()

scheme/ikarus.conditions.ss

@@ -355,7 +355,7 @@
              (if (null? ls) 
                  (display "Condition object with no further information\n" p)
                  (begin
-                   (display " Condition components:\n")
+                   (display " Condition components:\n" p)
                    (let f ([ls ls] [i 1])
                      (unless (null? ls)
                        (display "   " p)
@@ -369,7 +369,7 @@
            (newline p)]))
       (case-lambda
         [(x) 
-         (print-condition x (console-output-port))]
+         (print-condition x (standard-error-port))]
         [(x port)
          (if (output-port? port) 
              (print-condition x port)

scheme/ikarus.exceptions.ss

@@ -30,7 +30,7 @@
     (make-parameter
       (list 
         (lambda (x) 
-          (printf "unhandled exception:\n")
+          (display "Unhandled exception:\n" (standard-error-port))
           (print-condition x)
           (exit -1)))))