;; -*- Hen -*-

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

(define version "0.0.5")

(compile -O3 -d0 -s storage-classes.scm -J)
(compile -O2 -d0 -s storage-classes.import.scm)
(compile -O4 -d0 -s generalized-arrays-lowlevel.scm -J -t)
(compile -O3 -d0 -s generalized-arrays.scm generalized-arrays-lowlevel.c -J)
(compile -O2 -d0 -s generalized-arrays.import.scm)
(compile -O2 -d0 -s generalized-arrays-lowlevel.import.scm)

(install-extension
 'storage-classes
 `(,(dynld-name "storage-classes") ,(dynld-name "storage-classes.import"))
 `((version ,version)))

(install-extension
 'generalized-arrays
 `(,(dynld-name "generalized-arrays")
   ,(dynld-name "generalized-arrays.import")
   ,(dynld-name "generalized-arrays-lowlevel.import"))
 `((version ,version)))