/[mcclim]/mcclim/Doc/ex1.lisp
ViewVC logotype

Contents of /mcclim/Doc/ex1.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (show annotations)
Wed Jul 16 05:19:23 2003 UTC (10 years, 9 months ago) by strandh
Branch: MAIN
CVS Tags: McCLIM-0-9, mcclim-0-9-4, McCLIM-0-9-5, McCLIM-0-9-4, McCLIM-0-9-6, McCLIM-0-9-1, McCLIM-0-9-3, McCLIM-0-9-2, HEAD
An attempt to start integrating the examples of Gilbert's talk at LSM
2003 as a chapter of the 'getting started' part of the manual.
1 (in-package :common-lisp-user)
2
3 (defpackage "APP"
4 (:use :clim :clim-lisp)
5 (:export "APP-MAIN"))
6
7 (in-package :app)
8
9 (define-application-frame superapp ()
10 ()
11 (:panes
12 (int :interactor :height 400 :width 600))
13 (:layouts
14 (default int)))
15
16 (defun app-main ()
17 (run-frame-top-level (make-application-frame 'superapp)))

  ViewVC Help
Powered by ViewVC 1.1.5