;;;; -*- Hen -*-

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

(make (
       ((dynld-name "flsim") ("flsim.scm" )
	(compile -O -d2 -S -s flsim.scm -j flsim))

       ((dynld-name "flsim.import") ("flsim.import.scm")
	(compile -O -d2 -S -s flsim.import.scm))
       )

  (list (dynld-name "flsim")
	(dynld-name "flsim.import"))
  )

(install-extension

  ; Name of your extension:
  'flsim

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

  ; Assoc list with properties for your extension:
  `((version 1.1)
    (documentation "flsim.html")
    ))

(make (
       ((dynld-name "runge-kutta") ("runge-kutta.scm" )
	(compile -O2 -S -s runge-kutta.scm -j runge-kutta))

       ((dynld-name "runge-kutta.import") ("runge-kutta.import.scm")
	(compile -O2 -S -s runge-kutta.import.scm))
       )

  (list (dynld-name "runge-kutta")
	(dynld-name "runge-kutta.import"))
  )

(install-extension

  ; Name of your extension:
  'runge-kutta

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

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