Skip to content

Instantly share code, notes, and snippets.

@moratori

moratori/app1.lisp

Created July 12, 2014 14:42
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save moratori/a27c712eaa2db65f8a7f to your computer and use it in GitHub Desktop.
Save moratori/a27c712eaa2db65f8a7f to your computer and use it in GitHub Desktop.
Download ZIP
clim app1
Raw
app1.lisp
(in-package :cl-user)
(ql:quickload :clx)
(ql:quickload :mcclim)
(defpackage app
(:use :clim
:clim-lisp))
(in-package :app)
(define-application-frame main-frame ()
()
(:panes
(int :interactor :height 480 :width 640))
(:layouts
(default int)))
(defun main ()
(run-frame-top-level
(make-application-frame 'main-frame)))
(main)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment