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

Diff of /slime/swank.lisp

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

revision 1.289 by heller, Mon Mar 21 00:58:46 2005 UTC revision 1.290 by mbaringer, Wed Mar 23 12:23:05 2005 UTC
# Line 1785  FORM is expected, but not required, to b Line 1785  FORM is expected, but not required, to b
1785    "Set the value of a setf'able FORM to VALUE.    "Set the value of a setf'able FORM to VALUE.
1786  FORM and VALUE are both strings from Emacs."  FORM and VALUE are both strings from Emacs."
1787    (with-buffer-syntax ()    (with-buffer-syntax ()
1788      (eval `(setf ,(read-from-string form) ',(read-from-string value)))      (eval `(setf ,(read-from-string form) ,(read-from-string (concatenate 'string "`" value))))
1789      t))      t))
1790    
1791    

Legend:
Removed from v.1.289  
changed lines
  Added in v.1.290

  ViewVC Help
Powered by ViewVC 1.1.5