(uiop:define-package :foobar
    (:mix :clim :clim-lisp :cl))

(in-package :foobar)

(defun start-foobar ()
  ;; (require :mcclim)
  (trace)
  (define-application-frame test () ())
  (find-application-frame 'test)
  (read-line))