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)
|
bindir=$(dirname $0)
|
||||||
fi
|
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=
|
sep=
|
||||||
if [ "$(basename ${SCHEME-$MES})" = "mes" ]; then
|
if [ "$(basename ${SCHEME-$MES})" = "mes" ]; then
|
||||||
sep=--
|
sep=--
|
||||||
|
@ -68,6 +54,3 @@ ${SCHEME-$MES} \
|
||||||
$bindir/mescc.scm\
|
$bindir/mescc.scm\
|
||||||
$sep\
|
$sep\
|
||||||
"$@"
|
"$@"
|
||||||
|
|
||||||
# ..but using -- "$@" that seems no longer necessary!
|
|
||||||
# $args
|
|
||||||
|
|
Loading…
Reference in a new issue