1
0
mirror of synced 2026-01-26 04:12:03 +00:00

loadup and run-medley script bug fixes

This commit is contained in:
Larry Masinter
2022-07-16 11:51:58 -07:00
parent 8ee32f6243
commit 2120f5f458
8 changed files with 17 additions and 47 deletions

View File

@@ -11,11 +11,14 @@ fi
./scripts/loadup-mid-from-init.sh && \
./scripts/loadup-lisp-from-mid.sh && \
./scripts/loadup-full-from-lisp.sh && \
./scripts/loadup-aux.sh && \
./scripts/copy-all.sh && \
ls -l loadups/*.sysout loadups/whereis.hash library/exports.all && \
echo "**** DONE ****"
./scripts/loadup-aux.sh
echo "loadups are in $MEDLEYDIR/tmp"
edho use
echo " ./scripts/copy-all.sh "
echo "to copy to loadups library"
echo "**** DONE ****"

View File

@@ -8,6 +8,5 @@ if [ ! -x run-medley ] ; then
fi
./scripts/loadup-all.sh && \
./scripts/copy-all.sh && \
./scripts/release-medley.sh

View File

@@ -9,11 +9,6 @@ fi
touch tmp/loadup.timestamp
# Keep (GREET) from finding an init file
mkdir -p $MEDLEYDIR/tmp/logindir
export HOME=$MEDLEYDIR/tmp/logindir
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

View File

@@ -9,11 +9,6 @@ fi
touch tmp/loadup.timestamp
# Keep (GREET) from finding an init file
mkdir -p $MEDLEYDIR/tmp/logindir
export HOME=$MEDLEYDIR/tmp/logindir
export LOGINDIR=$MEDLEYDIR/tmp/logindir
scr="-sc 1024x768 -g 1042x790"
echo '" (IL:MEDLEY-INIT-VARS)(IL:FILESLOAD MEDLEY-UTILS)(IL:MAKE-FULLER-DB)(IL:LOGOUT T)"' > tmp/loadup-db.cm

View File

@@ -10,11 +10,6 @@ scr="-sc 1024x768 -g 1042x790"
touch tmp/loadup.timestamp
# Keep (GREET) from finding an init file
mkdir -p $MEDLEYDIR/tmp/logindir
export HOME=$MEDLEYDIR/tmp/logindir
export LOGINDIR=$MEDLEYDIR/tmp/logindir
./run-medley $scr -loadup "$MEDLEYDIR/sources/LOADUP-FULL.CM" "$MEDLEYDIR/tmp/lisp.sysout"
if [ tmp/full.sysout -nt tmp/loadup.timestamp ]; then

View File

@@ -7,25 +7,9 @@ if [ ! -x run-medley ] ; then
exit 1 ;
fi
# Keep (GREET) from finding an init file
mkdir -p $MEDLEYDIR/tmp/logindir
export HOME=$MEDLEYDIR/tmp/logindir
export LOGINDIR=$MEDLEYDIR/tmp/logindir
scr="-sc 1024x768 -g 1042x790"
./scripts/loadup-init.sh && \
./scripts/loadup-mid-from-init.sh && \
./scripts/loadup-lisp-from-mid.sh && \
./scripts/loadup-full-from-lisp.sh
touch tmp/loadup.timestamp
./run-medley $scr -loadup "$MEDLEYDIR/sources/LOADUP-FULL.CM" "$MEDLEYDIR/loadups/lisp.sysout"
if [ tmp/full.sysout -nt tmp/loadup.timestamp ]; then
echo ---- made ----
ls -l tmp/full.*
echo --------------
else
echo XXXXX FAILURE XXXXX
ls -l tmp/full.*
exit 1
fi

View File

@@ -9,11 +9,6 @@ fi
scr="-sc 1024x768 -g 1042x790"
# Keep (GREET) from finding an init file
mkdir -p $MEDLEYDIR/tmp/logindir
export HOME=$MEDLEYDIR/tmp/logindir
export LOGINDIR=$MEDLEYDIR/tmp/logindir
touch tmp/loadup.timestamp
./run-medley $scr -loadup "$MEDLEYDIR"/sources/LOADUP-INIT.LISP loadups/starter.sysout