source: trunk/ccl/examples/cocoa/easygui/easygui.asd @ 7641

Last change on this file since 7641 was 7641, checked in by af, 13 years ago

Improve easygui view hierarchy handling.

From Ron Garret's list of things: implement remove-subviews.

  • Add an example, example/view-hierarchy.lisp.
  • Move the other examples into example/ as well.
  • Implement a few memory management helpers: functions retain-object, release-object, and macro retaining-objects.
  • Allow box-views to have a title.
File size: 1.0 KB
Line 
1;;; -*- lisp -*-
2
3#+openmcl
4(eval-when (:compile-toplevel :load-toplevel :execute)
5  (require :asdf))
6
7#-openmcl
8(error "Requires OpenMCL")
9
10
11(cl:defpackage :easygui-system (:use :cl :asdf))
12
13(in-package :easygui-system)
14
15(defsystem cocoa.asd)
16
17(defmethod perform :after ((o compile-op) (sys (eql (find-system :cocoa.asd))))
18  (require :cocoa))
19
20(defmethod operation-done-p ((o compile-op) (sys (eql (find-system :cocoa.asd))))
21  nil)
22
23(defsystem easygui
24  :depends-on (cocoa.asd)
25  :components ((:file "package")
26               (:file "new-cocoa-bindings" :depends-on ("package"))
27               (:file "events" :depends-on ("new-cocoa-bindings"))
28               (:file "views" :depends-on ("events"))
29               (:file "action-targets" :depends-on ("views"))
30               (:module "example"
31                        :depends-on ("action-targets")
32                        :components
33                        ((:file "tiny")
34                         (:file "currency-converter")
35                         (:file "view-hierarchy")))))
Note: See TracBrowser for help on using the repository browser.