;; -*- Hen -*-

(define (dynld-name fn)		
  (make-pathname #f fn ##sys#load-dynamic-extension))	

(run (make))         ;XXX note: `cc' may not be available and will not work when cross-compiling

(compile -C -fPIC -O2 -d0 -I. -s fpio.scm gdtoa.a -j fpio)
(compile -O2 -d0 -s fpio.import.scm)

(install-extension

  ; Name of your extension:
  'fpio

  ; Files to install for your extension:
  `(,(dynld-name "fpio") ,(dynld-name "fpio.import") )

  ; Assoc list with properties for your extension:
  `((version 1.6)
    ))