;;; objc setup file

(define version "0.5.0")

(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.scm" "scheme-object.m" "scheme-object.h" "objc-base.so")
        (compile -objc -framework Foundation -s -O2 -d1
                 ,@(if easyffi? '(-extend easyffi) '())
                 objc.scm scheme-object.m))
       ("objc-base.so"
        ("objc-support.scm" "classes.scm" "alignment.scm"
         "array.scm" "convert.scm" "objc-base.scm" "objc-runtime.h")
        (compile objc-base.scm -s -objc -O2 -d1 -j objc-base
                 ,@(if easyffi? '(-extend easyffi) '())
                 -lffi -framework Foundation ,dbg)
        (compile objc-base.import.scm -s -O2 -d0))
       ("objc-cocoa.so" ("objc-cocoa.scm" "objc-base.so")
        (compile -s objc-cocoa.scm -objc -O2 -d1 -j objc-cocoa
                 ,@(if easyffi? '(-extend easyffi) '())
                 -framework Cocoa -X ./objc.scm ,dbg)
        (compile -s objc-cocoa.import.scm -O2 -d0)))
  '#("objc.so" "objc-base.so" "objc-cocoa.so"))

(install-extension
 'objc-cocoa
 `("objc-cocoa.so" "objc-cocoa.import.so")
 `((version ,version)))

(install-extension
 'objc-base
 `("objc-base.so" "objc-base.import.so")
 `((version ,version)))

(install-extension 'objc
 `("objc.so" "objc.import.so" "objc.html")
 `((version ,version)
   (documentation "objc.html")))