? compile-string-for-emacs.patch ? Backends/Null/frame-manager.fasl ? Backends/Null/graft.fasl ? Backends/Null/medium.fasl ? Backends/Null/package.fasl ? Backends/Null/port.fasl ? Drei/abbrev.fasl ? Drei/base.fasl ? Drei/basic-commands.fasl ? Drei/buffer-streams.fasl ? Drei/buffer.fasl ? Drei/core-commands.fasl ? Drei/core.fasl ? Drei/delegating-buffer.fasl ? Drei/drawing-options.fasl ? Drei/drei-clim.fasl ? Drei/drei-redisplay.fasl ? Drei/drei.fasl ? Drei/editing.fasl ? Drei/fundamental-syntax.fasl ? Drei/input-editor.fasl ? Drei/kill-ring.fasl ? Drei/lisp-syntax-commands.fasl ? Drei/lisp-syntax-swank.fasl ? Drei/lisp-syntax-swine.fasl ? Drei/lisp-syntax.fasl ? Drei/lr-syntax.fasl ? Drei/misc-commands.fasl ? Drei/modes.fasl ? Drei/motion.fasl ? Drei/packages.fasl ? Drei/rectangle.fasl ? Drei/search-commands.fasl ? Drei/syntax.fasl ? Drei/targets.fasl ? Drei/undo.fasl ? Drei/views.fasl ? Drei/Persistent/binseq-package.fasl ? Drei/Persistent/binseq.fasl ? Drei/Persistent/binseq2.fasl ? Drei/Persistent/obinseq.fasl ? Drei/Persistent/persistent-buffer.fasl ? Drei/Persistent/persistent-undo.fasl ? Drei/cl-automaton/automaton-package.fasl ? Drei/cl-automaton/automaton.fasl ? Drei/cl-automaton/eqv-hash.fasl ? Drei/cl-automaton/regexp.fasl ? Drei/cl-automaton/state-and-transition.fasl ? ESA/colors.fasl ? ESA/esa-buffer.fasl ? ESA/esa-command-parser.fasl ? ESA/esa-io.fasl ? ESA/esa.fasl ? ESA/packages.fasl ? ESA/utils.fasl ? Extensions/tab-layout.fasl Index: Drei/lisp-syntax-swank.lisp =================================================================== RCS file: /project/mcclim/cvsroot/mcclim/Drei/lisp-syntax-swank.lisp,v retrieving revision 1.12 diff -u -r1.12 lisp-syntax-swank.lisp --- Drei/lisp-syntax-swank.lisp 8 Feb 2008 10:37:46 -0000 1.12 +++ Drei/lisp-syntax-swank.lisp 7 Jun 2008 12:34:32 -0000 @@ -64,7 +64,8 @@ (swank::*buffer-package* package) (swank::*buffer-readtable* *readtable*)) (let ((result (swank::compile-string-for-emacs - string view-name (offset buffer-mark) (princ-to-string buffer-file-name))) + string view-name (offset buffer-mark) (princ-to-string buffer-file-name) + nil)) (notes (loop for note in (swank::compiler-notes-for-emacs) collect (make-compiler-note note)))) (values result notes))))