1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
;;; -*- Mode: Emacs-Lisp -*-
;;; ilisp-mak.el --
;;; This file is used by make to compile ILISP.
;;;
;;; This file is part of ILISP.
;;; Please refer to the file COPYING for copyrights and licensing
;;; information.
;;; Please refer to the file ACKNOWLEGDEMENTS for an (incomplete) list
;;; of present and past contributors.
;;;
;;; $Id: ilisp-mak.el,v 1.7 2002-06-03 23:37:02 wbd Exp $
(require 'cl)
(message "ILISP Compilation: starting.")
(if (not (file-exists-p "ilcompat.el"))
(error "ILISP Compilation: compatibility file 'ilcompat.el' non existent.")
(progn
(push "." 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+)
(when (eq +ilisp-emacs-version-id+ 'xemacs)
(setq load-path (cons "../xemacs-base" load-path)))
(if (eq +ilisp-emacs-version-id+ 'fsf-18)
(load "comint-v18")
;; (load "comint")
(require '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 <marcoxa@icsi.berkeley.edu>
;; (if (eq +ilisp-emacs-version-id+ 'fsf-18)
;; (setq byte-compile-emacs18-compatibility t))
;; Compile compatibility files
(cond ((or (eq +ilisp-emacs-version-id+ 'lucid-19)
(eq +ilisp-emacs-version-id+ 'lucid-19-new))
(byte-compile-file "illuc19.el"))
((eq +ilisp-emacs-version-id+ 'xemacs)
(byte-compile-file "ilxemacs.el"))
((eq +ilisp-emacs-version-id+ 'fsf-21)
(byte-compile-file "ilfsf21.el"))
((eq +ilisp-emacs-version-id+ 'fsf-20)
(byte-compile-file "ilfsf20.el"))
((eq +ilisp-emacs-version-id+ 'fsf-19)
(byte-compile-file "ilfsf19.el"))
((eq +ilisp-emacs-version-id+ 'fsf-18)
(byte-compile-file "ilfsf18.el"))
(t (error "ILISP Compilation: unrecognized Emacs version %s"
+ilisp-emacs-version-id+)))
(byte-compile-file "ilcompat.el")
;; Other files in the distribution.
(let ((files '("completer"
"comint-ipc"
"bridge"
;; not integrated yet!
;; "custom-ilisp"
"ilisp-def"
"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"
"ilisp-mnb"
;; ILD Support.
"ild"
;; Dialects.
"ilisp-cl"
"ilisp-ccl"
"ilisp-cmu"
"ilisp-sbcl"
"ilisp-chs"
"ilisp-acl"
"ilisp-kcl"
"ilisp-hlw"
"ilisp-luc"
"ilisp-xls"
"ilisp-openmcl"
"ilisp-sch"
"ilisp-cl-easy-menu"
"ilisp-scheme-easy-menu"
"ilisp-imenu"
"extra/hyperspec"
"extra/cltl2"
)))
(dolist (f files)
(byte-compile-file (format "%s.el" f) 0))
;;Main mode file
(byte-compile-file "ilisp.el")
(message "Done compiling and loading ILISP."))))
;;; end of file -- ilisp-mak.el --
|
