/[slime]/slime/swank-lispworks.lisp
ViewVC logotype

Diff of /slime/swank-lispworks.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.52 by heller, Sun Aug 1 06:26:02 2004 UTC revision 1.53 by msimmons, Wed Aug 4 10:56:58 2004 UTC
# Line 246  Return NIL if the symbol is unbound." Line 246  Return NIL if the symbol is unbound."
246                  ((&rest &optional &key) arg)                  ((&rest &optional &key) arg)
247                  (t                  (t
248                   (handler-case (dbg::dbg-eval arg frame)                   (handler-case (dbg::dbg-eval arg frame)
249                     (error (format nil "<~A>" arg))))))                     (error (e) (format nil "<~A>" arg))))))
250              (dbg::call-frame-arglist frame))))              (dbg::call-frame-arglist frame))))
251    
252  (defimplementation print-frame (frame stream)  (defimplementation print-frame (frame stream)

Legend:
Removed from v.1.52  
changed lines
  Added in v.1.53

  ViewVC Help
Powered by ViewVC 1.1.5