
(IN-PACKAGE DUMP)
(EVAL-WHEN (COMPILE LOAD EVAL)
                       (DATABASE:MAKESYMS '.%%SYMBOL-LABEL%%. 0 2 "DUMP"))

(SETQ DATABASE:*DB-INPUT* (SETQ .%%SYMBOL-LABEL%%.2 (MAKE-INSTANCE 'PAIL-LIB::POOLFILE :REAL-CONTENTS (LIST (SETQ .%%SYMBOL-LABEL%%.3 (MAKE-INSTANCE 'PAIL-LIB:POOL-ITEM :NAME-PART "safe-to-stack-wm" :START-OBJECT (PAIL-LIB::GET-FILE-OBJECT "safe-to-stack-wm")))) :CONTENTS (LIST (SETQ .%%SYMBOL-LABEL%%.4 (MAKE-INSTANCE 'PAIL-LIB::FILENTRY :CLASSNAME "WORKING-MEMORY" :POOLNAME "safe-to-stack-wm"))) :FILENAME "")))