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

Diff of /slime/swank.lisp

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

revision 1.448 by alendvai, Wed Jan 3 11:18:44 2007 UTC revision 1.449 by alendvai, Thu Jan 4 16:25:53 2007 UTC
# Line 2957  has changed, ignore the request." Line 2957  has changed, ignore the request."
2957  (defslimefun frame-locals-for-emacs (index)  (defslimefun frame-locals-for-emacs (index)
2958    "Return a property list ((&key NAME ID VALUE) ...) describing    "Return a property list ((&key NAME ID VALUE) ...) describing
2959  the local variables in the frame INDEX."  the local variables in the frame INDEX."
2960    (mapcar (lambda (frame-locals)    (with-bindings *sldb-printer-bindings*
2961              (destructuring-bind (&key name id value) frame-locals      (mapcar (lambda (frame-locals)
2962                (list :name (prin1-to-string name) :id id                (destructuring-bind (&key name id value) frame-locals
2963                      :value (to-string value))))                  (list :name (prin1-to-string name) :id id
2964            (frame-locals index)))                        :value (to-string value))))
2965                (frame-locals index))))
2966    
2967  (defslimefun frame-catch-tags-for-emacs (frame-index)  (defslimefun frame-catch-tags-for-emacs (frame-index)
2968    (mapcar #'to-string (frame-catch-tags frame-index)))    (mapcar #'to-string (frame-catch-tags frame-index)))

Legend:
Removed from v.1.448  
changed lines
  Added in v.1.449

  ViewVC Help
Powered by ViewVC 1.1.5