Hi,
I am trying to install ILisp with Emacs 20.3 at the request of one of
our users. of course, i am having problems, and the documentation does
not help any. My questions:
1) is Ilisp even needed with Emacs 20.3?
2) if it is, what I am doing wrong? When I cd to ilisp source directory,
the following occurs:
57 -root:thor- ~/ilisp-5.8> make
emacs -batch -l ilisp-mak.el
ILISP Compilation: starting.
Loading ilcompat.el (source)...
Loading ilfsf18 (source)...
Symbol's value as variable is void: comint-version
make: *** [compile] Error 255
Now nowhere is the instructions (that I found) does it say to simply
run 'make', but since there is a reasonable-looking Makefile there, this
was my best guess. Any ideas as to what I am doing wrong, and how this
can be rectified?
Also, my lisp is quite rusty (it was never all that good at the best of
times), so have mercy on this poor soul if you need to give an
explanation of what needs to be done with lisp source!
Many thanks,
--
Victor Danilchenko
Victor Danilchenko <········@cs.umass.edu> writes:
> Hi,
> I am trying to install ILisp with Emacs 20.3 at the request of one of
> our users. of course, i am having problems, and the documentation does
> not help any. My questions:
>
> 1) is Ilisp even needed with Emacs 20.3?
Not without some minor modifications. BTW, where did you get 5.8-a04? I
believe the regular 5.8 is the last version released. Look at the file
GETTING-ILISP to find out where you can get the latest version.
> 2) if it is, what I am doing wrong? When I cd to ilisp source directory,
> the following occurs:
>
> 57 -root:thor- ~/ilisp-5.8> make
> emacs -batch -l ilisp-mak.el
> ILISP Compilation: starting.
> Loading ilcompat.el (source)...
> Loading ilfsf18 (source)...
> Symbol's value as variable is void: comint-version
> make: *** [compile] Error 255
Included here are three files that you will want to replace/add. After
that all should work fine.
-------------------- ilcompat.el --------------------
;;; -*- Mode: Emacs-Lisp -*-
;;; ilcompat.el --
;;; This file is part of ILISP.
;;; Version: 5.8
;;;
;;; Copyright (C) 1990, 1991, 1992, 1993 Chris McConnell
;;; 1993, 1994 Ivan Vasquez
;;; 1994, 1995, 1996 Marco Antoniotti and Rick Busdiecker
;;; 1996 Marco Antoniotti and Rick Campbell
;;;
;;; Other authors' names for which this Copyright notice also holds
;;; may appear later in this file.
;;;
;;; Send mail to ··············@naggum.no' to be included in the
;;; ILISP mailing list. ······@naggum.no' is the general ILISP
;;; mailing list were bugs and improvements are discussed.
;;;
;;; ILISP is freely redistributable under the terms found in the file
;;; COPYING.
;;;============================================================================
;;; Global definitions/declarations
(defconst +ilisp-emacs-version-id+
(cond ((string-match "XEmacs" emacs-version)
'xemacs)
((string-match "Lucid" emacs-version)
(if (string-match "^19.[0-7][^0-9]" emacs-version)
'lucid-19
'lucid-19-new))
((string-match "^19" emacs-version)
'fsf-19)
((string-match "^20" emacs-version)
'fsf-20)
(t 'fsf-18))
"The version of Emacs ILISP is running in.
Declared as '(member fsf-19 fsf-19 fsf-20 lucid-19 lucid-19-new xemacs).
Set in ilcompat.el.")
(defconst +ilisp-emacs-minor-version-number+
(cond ((eq +ilisp-emacs-version-id+ 'fsf-18) 59)
((or (eq +ilisp-emacs-version-id+ 'lucid-19)
(eq +ilisp-emacs-version-id+ 'lucid-19-new)
)
12) ; Does emacs-minor-version work?
((eq +ilisp-emacs-version-id+ 'xemacs) 14)
(t emacs-minor-version)))
;;;============================================================================
;;; Code
(cond ((or (eq +ilisp-emacs-version-id+ 'lucid-19)
(eq +ilisp-emacs-version-id+ 'lucid-19-new))
(load "illuc19"))
((eq +ilisp-emacs-version-id+ 'xemacs) (load "ilxemacs"))
((eq +ilisp-emacs-version-id+ 'fsf-18) (load "ilfsf18"))
((eq +ilisp-emacs-version-id+ 'fsf-19) (load "ilfsf19"))
((eq +ilisp-emacs-version-id+ 'fsf-20) (load "ilfsf20"))
)
;;;============================================================================
;;; Epilogue
(provide 'compat)
;;; end of file -- compat.el --
-------------------- ilfsf20.el --------------------
;;; -*- Mode: Emacs-Lisp -*-
;;; ilfsf20.el --
;;; This file is part of ILISP.
;;; Version: 5.8
;;;
;;; Copyright (C) 1990, 1991, 1992, 1993 Chris McConnell
;;; 1993, 1994 Ivan Vasquez
;;; 1994, 1995, 1996 Marco Antoniotti and Rick Busdiecker
;;; 1996 Marco Antoniotti and Rick Campbell
;;;
;;; Other authors' names for which this Copyright notice also holds
;;; may appear later in this file.
;;;
;;; Send mail to ··············@naggum.no' to be included in the
;;; ILISP mailing list. ······@naggum.no' is the general ILISP
;;; mailing list were bugs and improvements are discussed.
;;;
;;; ILISP is freely redistributable under the terms found in the file
;;; COPYING.
;;;============================================================================
;;; Functions
(defun ilisp-get-input-ring ()
"Use instead of get-input-ring coming-input-ring or input-ring."
comint-input-ring)
(defun ilisp-ring-insert (ring input)
(ring-insert ring input))
(defun ilisp-temp-buffer-show-function-symbol ()
'temp-buffer-show-function)
(defun set-ilisp-temp-buffer-show-function (val)
(setq temp-buffer-show-function val))
(defun ilisp-temp-buffer-show-function ()
temp-buffer-show-function)
(defun ilisp-input-ring-index ()
comint-input-ring-index)
(defun set-ilisp-input-ring-index (n)
(setq comint-input-ring-index n))
(defun ilisp-input-ring-size ()
comint-input-ring-size)
(defun set-ilisp-input-ring-size (n)
(setq comint-input-ring-size n))
;;;============================================================================
;;; Epilogue
(provide 'compat-fsf-20)
;;; end of file -- ilfsf20.el --
-------------------- ilisp-mak.el --------------------
;;; -*- Mode: Emacs-Lisp -*-
;;; ilisp-mak.el --
;;; This file is part of ILISP.
;;; Version: 5.8
;;;
;;; Copyright (C) 1990, 1991, 1992, 1993 Chris McConnell
;;; 1993, 1994 Ivan Vasquez
;;; 1994, 1995, 1996 Marco Antoniotti and Rick Busdiecker
;;; 1996 Marco Antoniotti and Rick Campbell
;;;
;;; Other authors' names for which this Copyright notice also holds
;;; may appear later in this file.
;;;
;;; Send mail to ··············@naggum.no' to be included in the
;;; ILISP mailing list. ······@naggum.no' is the general ILISP
;;; mailing list were bugs and improvements are discussed.
;;;
;;; ILISP is freely redistributable under the terms found in the file
;;; COPYING.
;;;
;;; This file is used by make to compile ilisp.
;;;
;;; Note: 11/23/94 Marco Antoniotti. Actually I believe that this
;;; should be removed or redone.
(message "ILISP Compilation: starting.")
;;(require 'byte-compile)
(if (not (file-exists-p "ilcompat.el"))
(error "ILISP Compilation: compatibility file 'ilcompat.el' non existent.")
(progn
(setq load-path (cons "." load-path))
(load "ilcompat.el") ; Need to load this beforehand
; to use the +ilisp-emacs-version-id+
; constant.
(message ";;; Emacs Version %s" +ilisp-emacs-version-id+)
(if (eq +ilisp-emacs-version-id+ 'fsf-18)
(load "comint-v18")
(load "comint"))
;; Try to generate bytecodes for emacs 19.
;; I am no expert on the Byte Compiler. Anyone who is please send
;; me mail.
;; Marco Antoniotti <·······@icsi.berkeley.edu>
(if (eq +ilisp-emacs-version-id+ 'fsf-18)
(setq byte-compile-emacs18-compatibility t)
(setq byte-compile-generate-emacs19-bytecodes t
byte-compile-warnings '(redefine callargs unresolved)))
;; Compile compatibility files
(progn
(cond ((or (eq +ilisp-emacs-version-id+ 'lucid-19)
(eq +ilisp-emacs-version-id+ 'lucid-19-new)
(eq +ilisp-emacs-version-id+ 'xemacs))
(byte-compile "illuc19.el") ; Note that in current version
; of ILISP illuc19 and
; ilxemacs are linked
)
((eq +ilisp-emacs-version-id+ 'fsf-20)
(byte-compile "ilfsf20.el"))
((eq +ilisp-emacs-version-id+ 'fsf-19)
(byte-compile "ilfsf19.el"))
((eq +ilisp-emacs-version-id+ 'fsf-18)
(byte-compile "ilfsf18.el"))
(t (error "ILISP Compilation: unrecognized Emacs version %s"
+ilisp-emacs-version-id+)))
(byte-compile "ilcompat.el"))
;; Other files in the distribution.
(let ((files '(completer
comint-ipc
bridge
ilisp-def
ilisp-el
ilisp-sym
ilisp-inp
ilisp-ind
ilisp-prc
ilisp-val
ilisp-out
ilisp-mov
ilisp-key
ilisp-prn
ilisp-low
ilisp-doc
ilisp-ext
ilisp-mod
ilisp-dia
ilisp-cmt
ilisp-rng
ilisp-hnd
ilisp-utl
ilisp-cmp
ilisp-kil
ilisp-snd
ilisp-xfr
ilisp-hi
ilisp-aut
;; Dialects.
ilisp-cl
ilisp-cmu
ilisp-acl
ilisp-kcl
ilisp-hlw
ilisp-luc
ilisp-xls
ilisp-sch
)))
(while files
(byte-compile-file (format "%s.el" (car files)) 0)
(load (format "%s" (car files)))
(setq files (cdr files))))
(message "Done")))
;;; end of file -- ilisp-mak.el --