Ignore:
Timestamp:
Sep 25, 2004, 9:13:55 PM (16 years ago)
Author:
gb
Message:

Send backtrace info to typeout window on error (from Alex Crain.)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/examples/cocoa-editor.lisp

    r869 r878  
    13321332      (let* ((params (make-objc-instance 'ns:ns-array
    13331333                                         :with-objects paramptrs
    1334                                          :count 2)))
     1334                                         :count 2))
     1335             (*debug-io* *typeout-stream*))
     1336        (stream-clear-output *debug-io*)
     1337        (print-call-history :detailed-p nil)
    13351338        (send frame
    13361339              :perform-selector-on-main-thread
Note: See TracChangeset for help on using the changeset viewer.