(in-package "CL-USER")

(defun LW41-kpml-start () (kpml::kpml-restart-function :reset T))

(deliver 'lw41-kpml-start *image-destination* 0
	 :multiprocessing T
	 :packages-to-keep :all 
	 ;; '("LW-XP") 
	 ;; need lw-xp for pretty printing... but was being ditched, why?   
	 ;; :startup-bitmap-file "C:\\tmp\\kpml.bmp"  ;; this didn't work!
	 :keep-editor T
	 :keep-clos T
	 :keep-eval T)

#||
         :clos-info :classes-and-methods
         :diagnostics-file "C:\\kpml-clos-diags"
         :compact nil
         :in-memory-delivery T
         :keep-clos T
         :keep-debug-mode :keep-packages
||#
