;; -*- Hen -*-

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

(compile -O -d2 -S -s filepath.scm -j filepath)
(compile -O -d2 -s filepath.import.scm)

(install-extension

 ;; Name of your extension:
  'filepath

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

  ;; Assoc list with properties for your extension:
  '((version 1.3)
    ))