|
(eval-and-compile
|
|
(require 'slime))
|
|
|
|
(define-slime-contrib slime-presentation-streams
|
|
"Streams that allow attaching object identities to portions of
|
|
output."
|
|
(:authors "Alan Ruttenberg <alanr-l@mumble.net>"
|
|
"Matthias Koeppe <mkoeppe@mail.math.uni-magdeburg.de>"
|
|
"Helmut Eller <heller@common-lisp.net>")
|
|
(:license "GPL")
|
|
(:on-load
|
|
(add-hook 'slime-connected-hook 'slime-presentation-streams-on-connected))
|
|
(:swank-dependencies swank-presentation-streams))
|
|
|
|
(defun slime-presentation-streams-on-connected ()
|
|
(slime-eval `(swank:init-presentation-streams)))
|
|
|
|
(provide 'slime-presentation-streams)
|