;;;; -*- Hen -*-

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

(define version 2.4)

(use make)

(make (
       ((dynld-name "signal-diagram") ("signal-diagram.scm" "expr-utils.scm" )
	(compile -O -d2 -S -s signal-diagram.scm -j signal-diagram))

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

  (list (dynld-name "signal-diagram")
	(dynld-name "signal-diagram.import"))
  )

(install-extension

  ; Name of your extension:
  'signal-diagram

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

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


(make (
       ((dynld-name "signal-diagram-dynamics") ("signal-diagram-dynamics.scm" "expr-utils.scm" )
	(compile -O -d2 -S -s signal-diagram-dynamics.scm -j signal-diagram-dynamics))

       ((dynld-name "signal-diagram-dynamics.import") ("signal-diagram-dynamics.import.scm")
	(compile -O -d2 -S -s signal-diagram-dynamics.import.scm))
       )

  (list (dynld-name "signal-diagram-dynamics")
	(dynld-name "signal-diagram-dynamics.import"))
  )

(install-extension

  ; Name of your extension:
  'signal-diagram-dynamics

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

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