Mercurial > hg > xemacs-beta

comparison lisp/ilisp/ilisp-mak.el @ 0:376386a54a3c r19-14

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-14
author cvs
date Mon, 13 Aug 2007 08:45:50 +0200
parents
children b82b59fe008d
comparison
equal deleted inserted replaced
-1:000000000000 0:376386a54a3c
1 ;;; -*- Mode: Emacs-Lisp -*-
2
3 ;;; ilisp-mak.el --
4
5 ;;; This file is part of ILISP.
6 ;;; Version: 5.7
7 ;;;
8 ;;; Copyright (C) 1990, 1991, 1992, 1993 Chris McConnell
9 ;;; 1993, 1994 Ivan Vasquez
10 ;;; 1994, 1995 Marco Antoniotti and Rick Busdiecker
11 ;;;
12 ;;; Other authors' names for which this Copyright notice also holds
13 ;;; may appear later in this file.
14 ;;;
15 ;;; Send mail to 'ilisp-request@lehman.com' to be included in the
16 ;;; ILISP mailing list. 'ilisp@lehman.com' is the general ILISP
17 ;;; mailing list were bugs and improvements are discussed.
18 ;;;
19 ;;; ILISP is freely redistributable under the terms found in the file
20 ;;; COPYING.
21
22
23
24 ;;;
25 ;;; This file is used by make to compile ilisp.
26 ;;;
27 ;;; Note: 11/23/94 Marco Antoniotti. Actually I believe that this
28 ;;; should be removed or redone.
29
30 (message "ILISP Compilation: starting.")
31
32 ;;(require 'bytecomp)
33
34 (if (not (file-exists-p "ilcompat.el"))
35 (error "ILISP Compilation: compatibility file 'ilcompat.el' non existent.")
36 (progn
37 (setq load-path (cons "." load-path))
38
39 (load "ilcompat.el") ; Need to load this beforehand
40 ; to use the +ilisp-emacs-version-id+
41 ; constant.
42
43 (message ";;; Emacs Version %s" +ilisp-emacs-version-id+)
44
45 (if (eq +ilisp-emacs-version-id+ 'fsf-18)
46 (load "comint-v18")
47 (load "comint"))
48
49
50 ;; Try to generate bytecodes for emacs 19.
51 ;; I am no expert on the Byte Compiler. ANyone who is please send
52 ;; me mail.
53 ;; Marco Antoniotti <marcoxa@cs.nyu.edu>
54
55 (if (eq +ilisp-emacs-version-id+ 'fsf-18)
56 (setq byte-compile-emacs18-compatibility t)
57 (setq byte-compile-generate-emacs19-bytecodes t
58 byte-compile-warnings '(redefine callargs unresolved)))
59
60 ;; Compile compatibility files
61 (progn
62 (cond ((or (eq +ilisp-emacs-version-id+ 'lucid-19)
63 (eq +ilisp-emacs-version-id+ 'lucid-19-new)
64 (eq +ilisp-emacs-version-id+ 'xemacs))
65 (byte-compile "illuc19.el") ; Note that in current version
66 ; of ILISP illuc19 and
67 ; ilxemacs are linked
68 )
69 ((eq +ilisp-emacs-version-id+ 'fsf-19)
70 (byte-compile "ilfsf19.el"))
71 ((eq +ilisp-emacs-version-id+ 'fsf-18)
72 (byte-compile "ilfsf18.el"))
73 (t (error "ILISP Compilation: unrecogninized Emacs version %s"
74 +ilisp-emacs-version-id+)))
75 (byte-compile "ilcompat.el"))
76
77 ;; Other files in the distribution.
78
79 (let ((files '(completer
80 comint-ipc
81 bridge
82 ilisp-def
83 ilisp-el
84 ilisp-sym
85 ilisp-inp
86 ilisp-ind
87
88 ilisp-prc
89 ilisp-val
90 ilisp-out
91 ilisp-mov
92 ilisp-key
93 ilisp-prn
94 ilisp-low
95 ilisp-doc
96 ilisp-ext
97 ilisp-mod
98 ilisp-dia
99 ilisp-cmt
100 ilisp-rng
101 ilisp-hnd
102 ilisp-utl
103 ilisp-cmp
104 ilisp-kil
105 ilisp-snd
106 ilisp-xfr
107 ilisp-hi
108 ilisp-aut
109
110 ;; Dialects.
111 ilisp-cl
112 ilisp-cmu
113 ilisp-acl
114 ilisp-kcl
115 ilisp-hlw
116 ilisp-luc
117 ilisp-sch
118 )))
119 (while files
120 (byte-recompile-file (format "%s.el" (car files)) 0)
121 (load (format "%s" (car files)))
122 (setq files (cdr files))))
123
124 (message "Done")))
125
126 ;;; end of file -- ilisp-mak.el --
127