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

(SETQ DATABASE:*DB-INPUT* (SETQ .%%SYMBOL-LABEL%%.5 (MAKE-INSTANCE 'PAIL-LIB::POOLFILE :REAL-CONTENTS (LIST (SETQ .%%SYMBOL-LABEL%%.6 (MAKE-INSTANCE 'PAIL-LIB:POOL-ITEM :NAME-PART "regole" :START-OBJECT (PAIL-LIB::GET-FILE-OBJECT "regole"))) (SETQ .%%SYMBOL-LABEL%%.7 (MAKE-INSTANCE 'PAIL-LIB:POOL-ITEM :NAME-PART "fatti" :START-OBJECT (PAIL-LIB::GET-FILE-OBJECT "fatti"))) (SETQ .%%SYMBOL-LABEL%%.8 (MAKE-INSTANCE 'PAIL-LIB:POOL-ITEM :NAME-PART "famgoal" :START-OBJECT (PAIL-LIB::GET-FILE-OBJECT "famgoal")))) :CONTENTS (LIST (SETQ .%%SYMBOL-LABEL%%.9 (MAKE-INSTANCE 'PAIL-LIB::FILENTRY :CLASSNAME "BC-SET" :POOLNAME "regole")) (SETQ .%%SYMBOL-LABEL%%.10 (MAKE-INSTANCE 'PAIL-LIB::FILENTRY :CLASSNAME "WORKING-MEMORY" :POOLNAME "fatti")) (SETQ .%%SYMBOL-LABEL%%.11 (MAKE-INSTANCE 'PAIL-LIB::FILENTRY :CLASSNAME "WORKING-MEMORY" :POOLNAME "famgoal"))) :FILENAME "")))