;;; objc setup file (define version "0.5.1") (define easyffi? #t) (define dbg (if (member "-debug" (command-line-arguments)) "-kv -D debug" "")) ;; Uhh, I guess make body already in quasiquote (make (("objc.so" ("objc-support.scm" "classes.scm" "alignment.scm" "array.scm" "convert.scm" "objc.scm" "objc-runtime.h" "scheme-object.m" "scheme-object.h" "objc-class-proxies.scm" "objc-class-proxies-bin.scm") (compile objc.scm scheme-object.m -s -objc -O2 -d1 -j objc ,@(if easyffi? '(-extend easyffi) '()) -lffi -I/usr/include/ffi -framework Foundation ,dbg) (compile objc.import.scm -s -O2 -d0)) ("cocoa.so" ("objc-cocoa.scm" "objc.so") (compile -s objc-cocoa.scm -o cocoa.so -objc -O2 -d1 -j cocoa ,@(if easyffi? '(-extend easyffi) '()) -framework Cocoa ,dbg) (compile -s cocoa.import.scm -O2 -d0))) '#("objc.so" "cocoa.so")) (install-extension 'cocoa `("cocoa.so" "cocoa.import.so") `((version ,version))) (install-extension 'objc `("objc.so" "objc.import.so") `((version ,version)))