@@ -1,6 +1,6 @@

 CCL=ccl

-dylib: nsrect-expose.m libnsrect-expose.dylib

+dylib: nsrect-expose.m

 	clang -shared \

 			-framework Cocoa \

 			nsrect-expose.m \

@@ -32,10 +32,3 @@ mkapp: dylib demo-app demo-app.iconset

 	iconutil -c icns demo-app.iconset -o demo.app/Contents/Resources/demo-app.icns

 	ibtool --compile demo.app/Contents/Resources/MainMenu.nib MainMenu.xib

 	cp demo-app demo.app/Contents/MacOS

-

-run: dylib

-	$(CCL) --load ~/quicklisp/setup.lisp \

-			--eval '(load (compile-file "objc-runtime.asd"))' \

-			--eval '(ql:quickload :objc-runtime)' \

-			--eval '(load (compile-file "demo-app.lisp"))' \

-			--eval '(demo-app::main)'

@@ -19,7 +19,13 @@ lisp's ffi types.

 1. clone fwoar.lisputils from

    https://github.com/fiddlerwoaroof/fwoar.lisputils and put it

    somewhere quicklisp can find it (e.g. ~/quicklisp/local-projects)

-2. build + run the demo:

+

+2. Install rsvg-convert:

+#+BEGIN_SRC sh

+brew install librsvg

+#+END_SRC

+   

+3. build + run the demo:

    #+BEGIN_SRC sh

 make mkapp CCL=/path/to/ccl

 open demo.app

@@ -108,7 +108,7 @@

                      alloc init)

       (objc-runtime::class-add-method my-class do-magic (cffi:callback button-action)

                                       "v@:@")

-      (fw.lu:prog1-bind (result [[my-class alloc] init])

+      (let ((result [[my-class alloc] init]))

         [button set-target :pointer result]

         [button set-action :pointer do-magic]))))