| #!/bin/sh |
#!/bin/sh |
| # Copyright 1995 Free Software Foundation, Inc. |
# Copyright (C) 1995, 2000, 2003, 2004, 2005 Free Software Foundation, Inc. |
| # François Pinard <pinard@iro.umontreal.ca>, 1995. |
|
| |
scriptversion=2005-05-14.22 |
| |
|
| |
# Franc,ois Pinard <pinard@iro.umontreal.ca>, 1995. |
| # |
# |
| # This program is free software; you can redistribute it and/or modify |
# This program is free software; you can redistribute it and/or modify |
| # it under the terms of the GNU General Public License as published by |
# it under the terms of the GNU General Public License as published by |
| # |
# |
| # You should have received a copy of the GNU General Public License |
# You should have received a copy of the GNU General Public License |
| # along with this program; if not, write to the Free Software |
# along with this program; if not, write to the Free Software |
| # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. |
| |
|
| # As a special exception to the GNU General Public License, if you |
# As a special exception to the GNU General Public License, if you |
| # distribute this file as part of a program that contains a |
# distribute this file as part of a program that contains a |
| # configuration script generated by Autoconf, you may include it under |
# configuration script generated by Autoconf, you may include it under |
| # the same distribution terms that you use for the rest of that program. |
# the same distribution terms that you use for the rest of that program. |
| |
|
| # This script byte-compiles all `.el' files which are part of its |
# This file is maintained in Automake, please report |
| # arguments, using GNU Emacs, and put the resulting `.elc' files into |
# bugs to <bug-automake@gnu.org> or send patches to |
| # the current directory, so disregarding the original directories used |
# <automake-patches@gnu.org>. |
| # in `.el' arguments. |
|
| # |
case $1 in |
| # This script manages in such a way that all Emacs LISP files to |
'') |
| # be compiled are made visible between themselves, in the event |
echo "$0: No files. Try \`$0 --help' for more information." 1>&2 |
| # they require or load-library one another. |
exit 1; |
| |
;; |
| if test $# = 0; then |
-h | --h*) |
| echo 1>&2 "No files given to $0" |
cat <<\EOF |
| exit 1 |
Usage: elisp-comp [--help] [--version] FILES... |
| else |
|
| |
This script byte-compiles all `.el' files listed as FILES using GNU |
| |
Emacs, and put the resulting `.elc' files into the current directory, |
| |
so disregarding the original directories used in `.el' arguments. |
| |
|
| |
This script manages in such a way that all Emacs LISP files to |
| |
be compiled are made visible between themselves, in the event |
| |
they require or load-library one another. |
| |
|
| |
Report bugs to <bug-automake@gnu.org>. |
| |
EOF |
| |
exit $? |
| |
;; |
| |
-v | --v*) |
| |
echo "elisp-comp $scriptversion" |
| |
exit $? |
| |
;; |
| |
esac |
| |
|
| if test -z "$EMACS" || test "$EMACS" = "t"; then |
if test -z "$EMACS" || test "$EMACS" = "t"; then |
| # Value of "t" means we are running in a shell under Emacs. |
# Value of "t" means we are running in a shell under Emacs. |
| # Just assume Emacs is called "emacs". |
# Just assume Emacs is called "emacs". |
| fi |
fi |
| |
|
| tempdir=elc.$$ |
tempdir=elc.$$ |
| |
|
| |
# Cleanup the temporary directory on exit. |
| |
trap 'ret=$?; rm -rf "$tempdir" && exit $ret' 0 |
| |
trap '(exit $?); exit' 1 2 13 15 |
| |
|
| mkdir $tempdir |
mkdir $tempdir |
| cp $* $tempdir |
cp "$@" $tempdir |
| cd $tempdir |
|
| |
|
| |
( |
| |
cd $tempdir |
| echo "(setq load-path (cons nil load-path))" > script |
echo "(setq load-path (cons nil load-path))" > script |
| $EMACS -batch -q -l script -f batch-byte-compile *.el |
$EMACS -batch -q -l script -f batch-byte-compile *.el || exit $? |
| mv *.elc .. |
mv *.elc .. |
| |
) || exit $? |
| |
|
| cd .. |
(exit 0); exit 0 |
| rm -fr $tempdir |
|
| fi |
# Local Variables: |
| |
# mode: shell-script |
| |
# sh-indentation: 2 |
| |
# eval: (add-hook 'write-file-hooks 'time-stamp) |
| |
# time-stamp-start: "scriptversion=" |
| |
# time-stamp-format: "%:y-%02m-%02d.%02H" |
| |
# time-stamp-end: "$" |
| |
# End: |
