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

Diff of /slime/swank-clisp.lisp

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

revision 1.64 by heller, Thu Aug 23 19:03:37 2007 UTC revision 1.65 by mbaringer, Mon Feb 4 17:35:04 2008 UTC
# Line 627  Execute BODY with NAME's function slot s Line 627  Execute BODY with NAME's function slot s
627    
628  ;;;; Inspecting  ;;;; Inspecting
629    
630  (defclass clisp-inspector (backend-inspector) ())  (defmethod inspect-for-emacs ((o t))
   
 (defimplementation make-default-inspector () (make-instance 'clisp-inspector))  
   
 (defmethod inspect-for-emacs ((o t) (inspector backend-inspector))  
   (declare (ignore inspector))  
631    (let* ((*print-array* nil) (*print-pretty* t)    (let* ((*print-array* nil) (*print-pretty* t)
632           (*print-circle* t) (*print-escape* t)           (*print-circle* t) (*print-escape* t)
633           (*print-lines* custom:*inspect-print-lines*)           (*print-lines* custom:*inspect-print-lines*)

Legend:
Removed from v.1.64  
changed lines
  Added in v.1.65

  ViewVC Help
Powered by ViewVC 1.1.5