diff --git a/scripts/mescc.in b/scripts/mescc.in index 176d95ea..255c22f5 100644 --- a/scripts/mescc.in +++ b/scripts/mescc.in @@ -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