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

(setq database:*db-input* (setq .%%symbol-label%%.1 (make-instance 'pail-lib::poolfile :real-contents (list (setq .%%symbol-label%%.2 (make-instance 'pail-lib:pool-item :name-part "robot-ops" :start-object (pail-lib::get-file-object "robot-ops"))) (setq .%%symbol-label%%.3 (make-instance 'pail-lib:pool-item :name-part "r1in" :start-object (pail-lib::get-file-object "r1in"))) (setq .%%symbol-label%%.4 (make-instance 'pail-lib:pool-item :name-part "r1out" :start-object (pail-lib::get-file-object "r1out"))) (setq .%%symbol-label%%.5 (make-instance 'pail-lib:pool-item :name-part "r2in" :start-object (pail-lib::get-file-object "r2in"))) (setq .%%symbol-label%%.6 (make-instance 'pail-lib:pool-item :name-part "r2out" :start-object (pail-lib::get-file-object "r2out"))) (setq .%%symbol-label%%.7 (make-instance 'pail-lib:pool-item :name-part "r3in" :start-object (pail-lib::get-file-object "r3in"))) (setq .%%symbol-label%%.8 (make-instance 'pail-lib:pool-item :name-part "r3out" :start-object (pail-lib::get-file-object "r3out")))) :contents (list (setq .%%symbol-label%%.9 (make-instance 'pail-lib::filentry :classname "op-set" :poolname "robot-ops")) (setq .%%symbol-label%%.10 (make-instance 'pail-lib::filentry :classname "working-memory" :poolname "r1in")) (setq .%%symbol-label%%.11 (make-instance 'pail-lib::filentry :classname "working-memory" :poolname "r1out")) (setq .%%symbol-label%%.12 (make-instance 'pail-lib::filentry :classname "working-memory" :poolname "r2in")) (setq .%%symbol-label%%.13 (make-instance 'pail-lib::filentry :classname "working-memory" :poolname "r2out")) (setq .%%symbol-label%%.14 (make-instance 'pail-lib::filentry :classname "working-memory" :poolname "r3in")) (setq .%%symbol-label%%.15 (make-instance 'pail-lib::filentry :classname "working-memory" :poolname "r3out"))) :filename "")))