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

Diff of /slime/swank-scl.lisp

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

revision 1.30 by trittweiler, Tue Dec 30 18:57:54 2008 UTC revision 1.31 by heller, Thu Jan 8 10:33:44 2009 UTC
# Line 451  Line 451 
451                        (source-cache-get filename (file-write-date filename))                        (source-cache-get filename (file-write-date filename))
452                        (not (load output-file)))))))))                        (not (load output-file)))))))))
453    
454  (defimplementation swank-compile-string (string &key buffer position directory  (defimplementation swank-compile-string (string &key buffer position filename
455                                                  policy)                                                  policy)
456    (declare (ignore directory policy))    (declare (ignore filename policy))
457    (with-compilation-hooks ()    (with-compilation-hooks ()
458      (let ((*buffer-name* buffer)      (let ((*buffer-name* buffer)
459            (*buffer-start-position* position)            (*buffer-start-position* position)

Legend:
Removed from v.1.30  
changed lines
  Added in v.1.31

  ViewVC Help
Powered by ViewVC 1.1.5