(
  ,q (use :cl)
     fwoar.-clisp  0,qdefpackage :clim-test-app
     (:use :clim :cli-userfwoar)).
 
 
 
 *package*
 ,q (cl:use-package :clim-lisp)
 0
 *pack
 ,q (import cl:*package*)
 0,'
 0panes
 (text (make-pane 'text-fi )) j$hs test-app ()
 edi
 (ql:quickload :cl
 	      ,q (delete-package :clim-test-app)
 
 	      ,q
 	      (clim-demo:demodemo)) q