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 128 129 130 131 132 133 134 135
|
;;; -*- 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.
(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-25)
(byte-compile-file "ilfsf25.el"))
((eq +ilisp-emacs-version-id+ 'fsf-24)
(byte-compile-file "ilfsf24.el"))
((eq +ilisp-emacs-version-id+ 'fsf-23)
(byte-compile-file "ilfsf23.el"))
((eq +ilisp-emacs-version-id+ 'fsf-22)
(byte-compile-file "ilfsf22.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-mouse"
"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"
"ilisp-src"
;; 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 --
|