mescc: Drop $@-workaround.
* scripts/mescc.in: Drop $@-workaround.
This commit is contained in:
parent
5dc245e739
commit
84ec4865df
|
@ -41,20 +41,6 @@ if [ ! -f $bindir/mescc.scm ]; then
|
|||
bindir=$(dirname $0)
|
||||
fi
|
||||
|
||||
# Workaround for second getopt-long parsing by Mes' boot-0.scm.
|
||||
args=""
|
||||
for i in "$@"; do
|
||||
case "$i" in
|
||||
-[a-zA-Z]) args="$args $i";;
|
||||
-D[a-zA-Z]*) args="$args -D ${i:2}";;
|
||||
-I[a-zA-Z]*) args="$args -I ${i:2}";;
|
||||
-L[a-zA-Z]*) args="$args -L ${i:2}";;
|
||||
-l[a-zA-Z]*) args="$args -l ${i:2}";;
|
||||
-dumpmachine|-fno-builtin|-nodefaultlibs|-nostartfiles|-nostdinc|-nostdlib|-std=*) args="$args -$i";;
|
||||
*) args="$args $i";;
|
||||
esac
|
||||
done
|
||||
|
||||
sep=
|
||||
if [ "$(basename ${SCHEME-$MES})" = "mes" ]; then
|
||||
sep=--
|
||||
|
@ -68,6 +54,3 @@ ${SCHEME-$MES} \
|
|||
$bindir/mescc.scm\
|
||||
$sep\
|
||||
"$@"
|
||||
|
||||
# ..but using -- "$@" that seems no longer necessary!
|
||||
# $args
|
||||
|
|
Loading…
Reference in a new issue