Source

slimv-newlisp / slime / start-swank.lisp

Full commit
;;; This file is intended to be loaded by an implementation to
;;; get a running swank server
;;; e.g. sbcl --load start-swank.lisp
;;;
;;; Default port is 4005
;;; Default encoding is "iso-latin-1-unix"
;;;  see Emacs variable `slime-net-valid-coding-systems' for possible values.

;;; For additional swank-side configurations see
;;; 6.2 section of the Slime user manual.
;;;
;;; Modified for Slimv:
;;; - load contribs
;;; - don't close connection

(load (merge-pathnames "swank-loader.lisp" *load-truename*))

(swank-loader:init
 :delete nil         ; delete any existing SWANK packages
 :reload nil         ; reload SWANK, even if the SWANK package already exists
 :load-contribs t)   ; load all contribs

(swank:create-server :port 4005
                     :coding-system "utf-8-unix"

                     ;; if non-nil the connection won't be closed
                     ;; after connecting
                     :dont-close t)