version 1.2, 2002/12/24 14:47:24
|
version 1.3, 2007/06/02 14:25:26
|
Line 1
|
Line 1
|
#!/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 |
Line 14
|
Line 17
|
# |
# |
# 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 |
|
if test -z "$EMACS" || test "$EMACS" = "t"; then |
This script byte-compiles all `.el' files listed as FILES using GNU |
# Value of "t" means we are running in a shell under Emacs. |
Emacs, and put the resulting `.elc' files into the current directory, |
# Just assume Emacs is called "emacs". |
so disregarding the original directories used in `.el' arguments. |
EMACS=emacs |
|
fi |
This script manages in such a way that all Emacs LISP files to |
|
be compiled are made visible between themselves, in the event |
tempdir=elc.$$ |
they require or load-library one another. |
mkdir $tempdir |
|
cp $* $tempdir |
Report bugs to <bug-automake@gnu.org>. |
cd $tempdir |
EOF |
|
exit $? |
echo "(setq load-path (cons nil load-path))" > script |
;; |
$EMACS -batch -q -l script -f batch-byte-compile *.el |
-v | --v*) |
mv *.elc .. |
echo "elisp-comp $scriptversion" |
|
exit $? |
cd .. |
;; |
rm -fr $tempdir |
esac |
|
|
|
if test -z "$EMACS" || test "$EMACS" = "t"; then |
|
# Value of "t" means we are running in a shell under Emacs. |
|
# Just assume Emacs is called "emacs". |
|
EMACS=emacs |
fi |
fi |
|
|
|
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 |
|
cp "$@" $tempdir |
|
|
|
( |
|
cd $tempdir |
|
echo "(setq load-path (cons nil load-path))" > script |
|
$EMACS -batch -q -l script -f batch-byte-compile *.el || exit $? |
|
mv *.elc .. |
|
) || exit $? |
|
|
|
(exit 0); exit 0 |
|
|
|
# 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: |