Move exports.all to the loadups directory; add a LOADUPSDIRECTORIES to MEDLEY-INIT-VARS

.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: |

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

sources/MEDLEYDIR

@@ -1,12 +1,11 @@
 (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10)
 
-
(FILECREATED "22-Apr-2023 11:53:53" {DSK}<home>larry>il>medley>sources>MEDLEYDIR.;2
 9876   
-
-      :EDIT-BY "lmm"
+
(FILECREATED "17-Jul-2023 16:13:10" {DSK}<home>frank>il>medley>gmedley>sources>MEDLEYDIR.;2
 9970   
 
       :CHANGES-TO (VARS MEDLEY-INIT-VARS)
 
-      :PREVIOUS-DATE "22-Nov-2022 20:50:20" {DSK}<home>larry>il>medley>sources>MEDLEYDIR.;1)
+      :PREVIOUS-DATE "22-Apr-2023 11:53:53" {DSK}<home>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