add -m -mem option to Medley, default is 256
This commit is contained in:
parent
ab94267c49
commit
22e54106da
@ -34,6 +34,7 @@ fi
|
||||
|
||||
prog="lde"
|
||||
passthrough_args=""
|
||||
mem="-m 256"
|
||||
|
||||
if [ -z "$LDEDESTSYSOUT" ] ; then
|
||||
if [ -z "$LOGINDIR" ] ; then
|
||||
@ -86,6 +87,10 @@ while [ "$#" -ne 0 ]; do
|
||||
prog="$2"
|
||||
shift
|
||||
;;
|
||||
"-m" | "-mem" )
|
||||
mem="-m $2 "
|
||||
shift
|
||||
;;
|
||||
"-vmem" | "--vmem" | "-vmfile" )
|
||||
export LDEDESTSYSOUT="$2"
|
||||
shift
|
||||
@ -161,11 +166,11 @@ export PATH="$MAIKODIR"/`osversion`.`machinetype`:"$oldpath"
|
||||
cd "$OLDPWD"
|
||||
|
||||
echo "sysout is $LDESRCESYSOUT"
|
||||
echo "running `which $prog` $geometry $screensize"
|
||||
echo "running `which $prog` $geometry $screensize $mem"
|
||||
echo "start $LDEINIT"
|
||||
|
||||
export INMEDLEY=1
|
||||
|
||||
$prog $geometry $screensize -m 256 -t "Medley Interlisp" $passthrough_args "$LDESRCESYSOUT"
|
||||
$prog $geometry $screensize $mem -t "Medley Interlisp" $passthrough_args "$LDESRCESYSOUT"
|
||||
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user