github.com/Interlisp.medley
1
0
Fork 0
mirror of synced 2026-01-25 20:06:44 +00:00
Code Issues Projects Releases Wiki Activity

run-medley improvements (#476)

Browse Source
This commit is contained in:
Larry Masinter
2021-09-13 05:54:31 -07:00
committed by GitHub
parent 0236971881
commit d6f7ad7de9
8 changed files with 58 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
scripts/loadup-aux.sh
View File

@@ -17,7 +17,7 @@ export LOGINDIR=$MEDLEYDIR/tmp/logindir
scr="-sc 1024x768 -g 1042x790"
echo '" (IL:MEDLEY-INIT-VARS)(IL:LOAD(QUOTE MEDLEY-UTILS))(IL:MAKE-EXPORTS-ALL)(IL:MAKE-WHEREIS-HASH)(IL:LOGOUT T)"' > tmp/loadup-aux.cm
./run-medley $scr -greet "$MEDLEYDIR"/tmp/loadup-aux.cm tmp/full.sysout
./run-medley $scr -loadup "$MEDLEYDIR"/tmp/loadup-aux.cm tmp/full.sysout
if [ tmp/whereis.hash -nt tmp/loadup.timestamp ]; then

2
scripts/loadup-full-from-lisp.sh
View File

@@ -15,7 +15,7 @@ mkdir -p $MEDLEYDIR/tmp/logindir
export HOME=$MEDLEYDIR/tmp/logindir
export LOGINDIR=$MEDLEYDIR/tmp/logindir
./run-medley $scr -greet "$MEDLEYDIR/sources/LOADUP-FULL.CM" "$MEDLEYDIR/tmp/lisp.sysout"
./run-medley $scr -loadup "$MEDLEYDIR/sources/LOADUP-FULL.CM" "$MEDLEYDIR/tmp/lisp.sysout"
if [ tmp/full.sysout -nt tmp/loadup.timestamp ]; then

2
scripts/loadup-full.sh
View File

@@ -16,7 +16,7 @@ scr="-sc 1024x768 -g 1042x790"
touch tmp/loadup.timestamp
./run-medley $scr -greet "$MEDLEYDIR/sources/LOADUP-FULL.CM" "$MEDLEYDIR/loadups/lisp.sysout"
./run-medley $scr -loadup "$MEDLEYDIR/sources/LOADUP-FULL.CM" "$MEDLEYDIR/loadups/lisp.sysout"
if [ tmp/full.sysout -nt tmp/loadup.timestamp ]; then

2
scripts/loadup-init.sh
View File

@@ -16,7 +16,7 @@ export LOGINDIR=$MEDLEYDIR/tmp/logindir
touch tmp/loadup.timestamp
./run-medley $scr -greet "$MEDLEYDIR"/sources/LOADUP-INIT.LISP loadups/starter.sysout
./run-medley $scr -loadup "$MEDLEYDIR"/sources/LOADUP-INIT.LISP loadups/starter.sysout
if [ tmp/init.dlinit -nt tmp/loadup.timestamp ]; then

2
scripts/loadup-lisp-from-mid.sh
View File

@@ -12,7 +12,7 @@ touch tmp/loadup.timestamp
scr="-sc 1024x768 -g 1042x790"
./run-medley $scr -greet "$MEDLEYDIR/sources/LOADUP-LISP.CM" tmp/init-mid.sysout
./run-medley $scr -loadup "$MEDLEYDIR/sources/LOADUP-LISP.CM" tmp/init-mid.sysout
if [ tmp/lisp.sysout -nt tmp/loadup.timestamp ]; then

2
scripts/loadup-mid-from-init.sh
View File

@@ -12,7 +12,7 @@ touch tmp/loadup.timestamp
scr="-sc 1024x768 -g 1042x790"
./run-medley -prog ldeinit -greet $MEDLEYDIR/sources/XREM.CM $scr -vmem tmp/init-mid.sysout tmp/init.dlinit
./run-medley -prog ldeinit -loadup $MEDLEYDIR/sources/XREM.CM $scr -vmem tmp/init-mid.sysout tmp/init.dlinit
echo