diff --git a/.github/workflows/buildLoadup.yml b/.github/workflows/buildLoadup.yml index 55c5efdd..30699042 100644 --- a/.github/workflows/buildLoadup.yml +++ b/.github/workflows/buildLoadup.yml @@ -236,7 +236,7 @@ jobs: medley/loadups/full.sysout \ medley/loadups/apps.sysout \ medley/loadups/whereis.hash \ - medley/library/exports.all + medley/loadups/exports.all - name: Build runtime release tar run: | diff --git a/scripts/copy-all.sh b/scripts/copy-all.sh index 348e879b..3c208166 100755 --- a/scripts/copy-all.sh +++ b/scripts/copy-all.sh @@ -15,7 +15,7 @@ fi ./scripts/cpv tmp/full.sysout loadups ./scripts/cpv tmp/lisp.sysout loadups ./scripts/cpv tmp/whereis.hash loadups -./scripts/cpv tmp/exports.all library +./scripts/cpv tmp/exports.all loadups if [ "${1}" = "-apps" ]; then ./scripts/cpv tmp/apps.sysout loadups fi diff --git a/sources/MEDLEYDIR b/sources/MEDLEYDIR index e19dba87..33de3b4a 100644 --- a/sources/MEDLEYDIR +++ b/sources/MEDLEYDIR @@ -1,12 +1,11 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "22-Apr-2023 11:53:53" {DSK}larry>il>medley>sources>MEDLEYDIR.;2 9876 - - :EDIT-BY "lmm" +(FILECREATED "17-Jul-2023 16:13:10" {DSK}frank>il>medley>gmedley>sources>MEDLEYDIR.;2 9970 :CHANGES-TO (VARS MEDLEY-INIT-VARS) - :PREVIOUS-DATE "22-Nov-2022 20:50:20" {DSK}larry>il>medley>sources>MEDLEYDIR.;1) + :PREVIOUS-DATE "22-Apr-2023 11:53:53" {DSK}frank>il>medley>gmedley>sources>MEDLEYDIR.;1 +) (PRETTYCOMPRINT MEDLEYDIRCOMS) @@ -192,12 +191,14 @@ (CONS LOGINHOST/DIR '("INIT"] RESET) (XCL::*WHERE-IS-CASH-FILES* (MEDLEYDIR '("loadups") - "whereis.hash" NIL T)))) + "whereis.hash" NIL T)) + (LOADUPSDIRECTORIES (MEDLEYDIR '("loadups") + NIL NIL T)))) (DECLARE%: EVAL@COMPILE DOCOPY (ADDTOVAR GLOBALVARS MEDLEYDIR MEDLEY-INIT-VARS \SAVE.MEDLEYDIR DIRECTORIES) ) (DECLARE%: DONTCOPY - (FILEMAP (NIL (1474 7901 (MEDLEY-INIT-VARS 1484 . 4962) (MEDLEYDIR 4964 . 6919) (MEDLEYSUBSTDIR 6921 - . 7899))))) + (FILEMAP (NIL (1469 7896 (MEDLEY-INIT-VARS 1479 . 4957) (MEDLEYDIR 4959 . 6914) (MEDLEYSUBSTDIR 6916 + . 7894))))) STOP diff --git a/sources/MEDLEYDIR.LCOM b/sources/MEDLEYDIR.LCOM index 2d8de674..89fb6db2 100644 Binary files a/sources/MEDLEYDIR.LCOM and b/sources/MEDLEYDIR.LCOM differ