Source

ilisp / ilisp.emacs

Diff from to

ilisp.emacs

 ;; Franz
 (autoload 'allegro     "ilisp" "Inferior Allegro Common Lisp." t)
 
+;; Corman
+(autoload 'cormanlisp  "ilisp" "Inferior Corman Common Lisp." t)
+
 ;; Lucid
 ; (autoload 'lucid     "ilisp" "Inferior Lucid Common Lisp." t)
 
 
 (setq clisp-hs-program "clisp -I")
 
+;(setq *cormanlisp-dir* "C:\\CORMAN~1\\CORMAN~1.5\\")
+;(setq cormanlisp-program
+;      (concat *cormanlisp-dir* "clconsole.exe" 
+;	       " -image " *cormanlisp-dir* "CormanLisp.img"))
+
 ; (setq lispworks-program
 ;       "/somewhere/in/the/directory/tree/lispworks")
 
                        ("\\.cl$" . lisp-mode))
                      auto-mode-alist))
 
-(setq lisp-mode-hook '(lambda () (require 'ilisp)))
+(add-hook 'lisp-mode-hook '(lambda () (require 'ilisp)))
 
 (set-default 'auto-mode-alist
              (append '(("\\.scm$" . scheme-mode)
                        ("\\.stklos$" . scheme-mode))
                      auto-mode-alist))
 
-(setq scheme-mode-hook '(lambda () (require 'ilisp)))
+(add-hook 'scheme-mode-hook '(lambda () (require 'ilisp)))
 
 
 ;;; Configuration of Erik Naggum's HyperSpec access package.
 ;; If you have a local copy of the HyperSpec, set its path here.
 ; (setq common-lisp-hyperspec-root
 ;       "file:/home/joe/HyperSpec/")
+; (setq common-lisp-hyperspec-symbol-table
+;       "/home/joe/HyperSpec/Data/Map_Sym.Txt")
+
+;; Here's how to get the newest version of the CLHS:
+;; <http://groups.google.com/groups?selm=sfwvgftux7g.fsf%40shell01.TheWorld.com>
+
+
+
+;;; Configuration of Utz-Uwe Haus' CLtL2 access package.
+
+;; If you have a local copy of CLtL2, set its path here.
+; (setq cltl2-root-url
+;       "file:/home/joe/cltl2/")
 
 
 ;;; Sample load hook