Mercurial > hg > xemacs-beta

comparison lisp/prim/update-elc.el @ 155:43dd3413c7c7 r20-3b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b4
author cvs
date Mon, 13 Aug 2007 09:39:39 +0200
parents c7528f8e288d
children 0132846995bd
comparison
equal deleted inserted replaced
154:94141801dd7e 155:43dd3413c7c7
1 ;;; update-elc.el --- Bytecompile out-of-date dumped files
2
3 ;; Copyright (C) 1997 Free Software Foundation, Inc.
4 ;; Copyright (C) 1996 Unknown
5
6 ;; Maintainer: XEmacs Development Team
7 ;; Keywords: internal
8
1 ;; This file is part of XEmacs. 9 ;; This file is part of XEmacs.
2 10
3 ;; XEmacs is free software; you can redistribute it and/or modify it 11 ;; XEmacs is free software; you can redistribute it and/or modify it
4 ;; under the terms of the GNU General Public License as published by 12 ;; under the terms of the GNU General Public License as published by
5 ;; the Free Software Foundation; either version 2, or (at your option) 13 ;; the Free Software Foundation; either version 2, or (at your option)
15 ;; Free Software Foundation, 59 Temple Place - Suite 330, 23 ;; Free Software Foundation, 59 Temple Place - Suite 330,
16 ;; Boston, MA 02111-1307, USA. 24 ;; Boston, MA 02111-1307, USA.
17 25
18 ;;; Synched up with: Not in FSF. 26 ;;; Synched up with: Not in FSF.
19 27
28 ;;; Commentary:
29
20 ;; Byte compile the .EL files necessary to dump out xemacs. 30 ;; Byte compile the .EL files necessary to dump out xemacs.
21 ;; Use this file like this: 31 ;; Use this file like this:
22 ;; 32 ;;
23 ;; temacs -batch -l ../lisp/prim/update-elc.el $lisp 33 ;; temacs -batch -l ../lisp/prim/update-elc.el $lisp
24 ;; 34 ;;
26 ;; cause the corresponding .el file to be compiled. .el files listed in 36 ;; cause the corresponding .el file to be compiled. .el files listed in
27 ;; $lisp will be ignored. 37 ;; $lisp will be ignored.
28 ;; 38 ;;
29 ;; (the idea here is that you can bootstrap if your .ELC files 39 ;; (the idea here is that you can bootstrap if your .ELC files
30 ;; are missing or badly out-of-date) 40 ;; are missing or badly out-of-date)
41
42 ;; Currently this code gets the list of files to check passed to it from
43 ;; src/Makefile. This must be fixed. -slb
44
45 ;;; Code:
31 46
32 (setq update-elc-files-to-compile 47 (setq update-elc-files-to-compile
33 (delq nil 48 (delq nil
34 (mapcar (function 49 (mapcar (function
35 (lambda (x) 50 (lambda (x)
54 "-l" "bytecomp" "-f" "batch-byte-compile") 69 "-l" "bytecomp" "-f" "batch-byte-compile")
55 update-elc-files-to-compile))) 70 update-elc-files-to-compile)))
56 (load "loadup-el.el"))) 71 (load "loadup-el.el")))
57 72
58 (kill-emacs) 73 (kill-emacs)
74
75 ;;; update-elc.el ends here