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