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

(SETQ DATABASE:*DB-INPUT* (SETQ .%%SYMBOL-LABEL%%.9 (MAKE-INSTANCE 'PAIL-LIB::POOLFILE :REAL-CONTENTS (LIST (SETQ .%%SYMBOL-LABEL%%.10 (MAKE-INSTANCE 'PAIL-LIB:POOL-ITEM :NAME-PART "vegetable-data" :START-OBJECT (PAIL-LIB::GET-FILE-OBJECT "vegetable-data"))) (SETQ .%%SYMBOL-LABEL%%.11 (MAKE-INSTANCE 'PAIL-LIB:POOL-ITEM :NAME-PART "vegetables" :START-OBJECT (PAIL-LIB::GET-FILE-OBJECT "vegetables")))) :CONTENTS (LIST (SETQ .%%SYMBOL-LABEL%%.12 (MAKE-INSTANCE 'PAIL-LIB::FILENTRY :CLASSNAME "WORKING-MEMORY" :POOLNAME "vegetable-data")) (SETQ .%%SYMBOL-LABEL%%.13 (MAKE-INSTANCE 'PAIL-LIB::FILENTRY :CLASSNAME "RULE-SET" :POOLNAME "vegetables"))) :FILENAME "")))