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

Diff of /slime/swank-loader.lisp

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

revision 1.90 by heller, Thu Jan 8 16:20:14 2009 UTC revision 1.91 by heller, Sun Jul 26 08:00:40 2009 UTC
# Line 37  Line 37 
37    #+scl '(swank-source-path-parser swank-source-file-cache swank-scl)    #+scl '(swank-source-path-parser swank-source-file-cache swank-scl)
38    #+sbcl '(swank-source-path-parser swank-source-file-cache    #+sbcl '(swank-source-path-parser swank-source-file-cache
39             swank-sbcl swank-gray)             swank-sbcl swank-gray)
40    #+openmcl '(metering swank-openmcl swank-gray)    #+clozure '(metering swank-ccl swank-gray)
41    #+lispworks '(swank-lispworks swank-gray)    #+lispworks '(swank-lispworks swank-gray)
42    #+allegro '(swank-allegro swank-gray)    #+allegro '(swank-allegro swank-gray)
43    #+clisp '(xref metering swank-clisp swank-gray)    #+clisp '(xref metering swank-clisp swank-gray)
# Line 46  Line 46 
46    #+ecl '(swank-source-path-parser swank-source-file-cache swank-ecl swank-gray))    #+ecl '(swank-source-path-parser swank-source-file-cache swank-ecl swank-gray))
47    
48  (defparameter *implementation-features*  (defparameter *implementation-features*
49    '(:allegro :lispworks :sbcl :openmcl :cmu :clisp :ccl :corman :cormanlisp    '(:allegro :lispworks :sbcl :clozure :cmu :clisp :ccl :corman :cormanlisp
50      :armedbear :gcl :ecl :scl))      :armedbear :gcl :ecl :scl))
51    
52  (defparameter *os-features*  (defparameter *os-features*
# Line 58  Line 58 
58      :sparc64 :sparc :hppa64 :hppa))      :sparc64 :sparc :hppa64 :hppa))
59    
60  (defun lisp-version-string ()  (defun lisp-version-string ()
61    #+(or openmcl cmu)       (substitute-if #\_ (lambda (x) (find x " /"))    #+(or clozure cmu) (substitute-if #\_ (lambda (x) (find x " /"))
62                               (lisp-implementation-version))                                      (lisp-implementation-version))
63    #+(or cormanlisp scl sbcl ecl)       (lisp-implementation-version)    #+(or cormanlisp scl sbcl ecl)       (lisp-implementation-version)
64    #+lispworks (lisp-implementation-version)    #+lispworks (lisp-implementation-version)
65    #+allegro   (format nil    #+allegro   (format nil

Legend:
Removed from v.1.90  
changed lines
  Added in v.1.91

  ViewVC Help
Powered by ViewVC 1.1.5