
(in-package dump)
(EVAL-WHEN (COMPILE LOAD EVAL)
                       (DATABASE:MAKESYMS '.%%symbol-label%%. 0 5 "dump"))

(setq database:*db-input* (setq .%%symbol-label%%.49 (make-instance 'pail-lib::poolfile :real-contents (list (setq .%%symbol-label%%.50 (make-instance 'pail-lib:pool-item :name-part "ornythorinque" :start-object (pail-lib::get-file-object "ornythorinque"))) (setq .%%symbol-label%%.51 (make-instance 'pail-lib:pool-item :name-part "singe" :start-object (pail-lib::get-file-object "singe"))) (setq .%%symbol-label%%.52 (make-instance 'pail-lib:pool-item :name-part "facts" :start-object (pail-lib::get-file-object "facts"))) (setq .%%symbol-label%%.53 (make-instance 'pail-lib:pool-item :name-part "animals" :start-object (pail-lib::get-file-object "animals")))) :contents (list (setq .%%symbol-label%%.54 (make-instance 'pail-lib::filentry :classname "working-memory" :poolname "ornythorinque")) (setq .%%symbol-label%%.55 (make-instance 'pail-lib::filentry :classname "working-memory" :poolname "singe")) (setq .%%symbol-label%%.56 (make-instance 'pail-lib::filentry :classname "working-memory" :poolname "facts")) (setq .%%symbol-label%%.57 (make-instance 'pail-lib::filentry :classname "bc-set" :poolname "animals"))) :filename "")))