From 22e54106da41a2d5ef93f75b1f74999a192630ed Mon Sep 17 00:00:00 2001
From: Larry Masinter <LMM@acm.org>
Date: Mon, 1 Mar 2021 20:51:51 -0800
Subject: [PATCH] add -m -mem option to Medley, default is 256

---
 run-medley | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/run-medley b/run-medley
index 609fd874..9f17353f 100755
--- a/run-medley
+++ b/run-medley
@@ -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"