; -*- Hen -*- (define (dynld-name fn) (make-pathname #f fn ##sys#load-dynamic-extension)) (define nemo-version 6.9) (use make) (make ( ("expr.grm.scm" ("expr.grm") (run (csi -s expr.grm))) ((dynld-name "nemo-core") ("nemo-core.scm" "expr.grm.scm") (compile -O -d2 -S -s nemo-core.scm -j nemo-core)) ((dynld-name "nemo-core.import") ("nemo-core.import.scm") (compile -O2 -s nemo-core.import.scm)) ) (list (dynld-name "nemo-core") (dynld-name "nemo-core.import")) ) (install-extension ; Name of your extension: 'nemo-core ; Files to install for your extension: `(,(dynld-name "nemo-core") ,(dynld-name "nemo-core.import")) ; Assoc list with properties for your extension: `((version ,nemo-version))) (make ( ((dynld-name "nemo-utils") ("nemo-utils.scm") (compile -O -d2 -S -s nemo-utils.scm -j nemo-utils)) ((dynld-name "nemo-utils.import") ("nemo-utils.import.scm") (compile -O2 -s nemo-utils.import.scm)) ) (list (dynld-name "nemo-utils") (dynld-name "nemo-utils.import")) ) (install-extension ; Name of your extension: 'nemo-utils ; Files to install for your extension: `(,(dynld-name "nemo-utils") ,(dynld-name "nemo-utils.import")) ; Assoc list with properties for your extension: `((version ,nemo-version))) (make ( ((dynld-name "nemo-synapse") ("nemo-synapse.scm") (compile -O -d2 -S -s nemo-synapse.scm -j nemo-synapse)) ((dynld-name "nemo-synapse.import") ("nemo-synapse.import.scm") (compile -O2 -s nemo-synapse.import.scm)) ) (list (dynld-name "nemo-synapse") (dynld-name "nemo-synapse.import")) ) (install-extension ; Name of your extension: 'nemo-synapse ; Files to install for your extension: `(,(dynld-name "nemo-synapse") ,(dynld-name "nemo-synapse.import") ) ; Assoc list with properties for your extension: `((version ,nemo-version))) (make ( ((dynld-name "nemo-gate-complex") ("nemo-gate-complex.scm") (compile -O -d2 -S -s nemo-gate-complex.scm -j nemo-gate-complex)) ((dynld-name "nemo-gate-complex.import") ("nemo-gate-complex.import.scm") (compile -O2 -s nemo-gate-complex.import.scm)) ) (list (dynld-name "nemo-gate-complex") (dynld-name "nemo-gate-complex.import")) ) (install-extension ; Name of your extension: 'nemo-gate-complex ; Files to install for your extension: `(,(dynld-name "nemo-gate-complex") ,(dynld-name "nemo-gate-complex.import") ) ; Assoc list with properties for your extension: `((version ,nemo-version))) (make ( ((dynld-name "nemo-macros") ("nemo-macros.scm") (compile -O -d2 -S -s nemo-macros.scm -j nemo-macros)) ((dynld-name "nemo-macros.import") ("nemo-macros.import.scm") (compile -O2 -s nemo-macros.import.scm)) ) (list (dynld-name "nemo-macros") (dynld-name "nemo-macros.import")) ) (install-extension ; Name of your extension: 'nemo-macros ; Files to install for your extension: `(,(dynld-name "nemo-macros") ,(dynld-name "nemo-macros.import") ) ; Assoc list with properties for your extension: `((version ,nemo-version))) (make ( ((dynld-name "nemo-nmodl") ("nemo-nmodl.scm") (compile -O -d2 -S -s nemo-nmodl.scm -j nemo-nmodl)) ((dynld-name "nemo-nmodl.import") ("nemo-nmodl.import.scm") (compile -O2 -s nemo-nmodl.import.scm)) ) (list (dynld-name "nemo-nmodl") (dynld-name "nemo-nmodl.import")) ) (install-extension ; Name of your extension: 'nemo-nmodl ; Files to install for your extension: `(,(dynld-name "nemo-nmodl") ,(dynld-name "nemo-nmodl.import") ) ; Assoc list with properties for your extension: `((version ,nemo-version))) (if (file-exists? "nemo-matlab.scm") (begin (make ( ((dynld-name "nemo-matlab") ("nemo-matlab.scm") (compile -O -d2 -S -s nemo-matlab.scm -j nemo-matlab)) ((dynld-name "nemo-matlab.import") ("nemo-matlab.import.scm") (compile -O2 -s nemo-matlab.import.scm)) ) (list (dynld-name "nemo-matlab") (dynld-name "nemo-matlab.import")) ))) (if (file-exists? "nemo-matlab.scm") (install-extension ;; Name of your extension: 'nemo-matlab ;; Files to install for your extension: `(,(dynld-name "nemo-matlab") ,(dynld-name "nemo-matlab.import") ) ;; Assoc list with properties for your extension: `((version ,nemo-version)))) (if (file-exists? "nemo-nest.scm") (begin (make ( ((dynld-name "nemo-nest") ("nemo-nest.scm") (compile -O -d2 -S -s nemo-nest.scm -j nemo-nest)) ((dynld-name "nemo-nest.import") ("nemo-nest.import.scm") (compile -O2 -s nemo-nest.import.scm)) ) (list (dynld-name "nemo-nest") (dynld-name "nemo-nest.import")) ))) (if (file-exists? "nemo-nest.scm") (install-extension ;; Name of your extension: 'nemo-nest ;; Files to install for your extension: `(,(dynld-name "nemo-nest") ,(dynld-name "nemo-nest.import") ) ;; Assoc list with properties for your extension: `((version ,nemo-version)))) (if (file-exists? "nemo-pyparams.scm") (begin (make ( ((dynld-name "nemo-pyparams") ("nemo-pyparams.scm") (compile -O -d2 -S -s nemo-pyparams.scm -j nemo-pyparams)) ((dynld-name "nemo-pyparams.import") ("nemo-pyparams.import.scm") (compile -O2 -s nemo-pyparams.import.scm)) ) (list (dynld-name "nemo-pyparams") (dynld-name "nemo-pyparams.import")) ))) (if (file-exists? "nemo-pyparams.scm") (install-extension ;; Name of your extension: 'nemo-pyparams ;; Files to install for your extension: `(,(dynld-name "nemo-pyparams") ,(dynld-name "nemo-pyparams.import") ) ;; Assoc list with properties for your extension: `((version ,nemo-version)))) (if (file-exists? "nemo-eqn.scm") (begin (make ( ((dynld-name "nemo-eqn") ("nemo-eqn.scm") (compile -O -d2 -S -s nemo-eqn.scm -j nemo-eqn)) ((dynld-name "nemo-eqn.import") ("nemo-eqn.import.scm") (compile -O2 -s nemo-eqn.import.scm)) ) (list (dynld-name "nemo-eqn") (dynld-name "nemo-eqn.import")) ))) (if (file-exists? "nemo-eqn.scm") (install-extension ;; Name of your extension: 'nemo-eqn ;; Files to install for your extension: `(,(dynld-name "nemo-eqn") ,(dynld-name "nemo-eqn.import") ) ;; Assoc list with properties for your extension: `((version ,nemo-version)))) (make ( ((dynld-name "nemo-hh") ("extensions/nemo-hh.scm") (compile -O -d2 -S -s extensions/nemo-hh.scm -j nemo-hh -o ,(dynld-name "nemo-hh")) ) ((dynld-name "nemo-hh.import") ("nemo-hh.import.scm") (compile -O2 -s nemo-hh.import.scm)) ) (list (dynld-name "nemo-hh") (dynld-name "nemo-hh.import")) ) (install-extension ; Name of your extension: 'nemo-hh ; Files to install for your extension: `(,(dynld-name "nemo-hh") ,(dynld-name "nemo-hh.import")) ; Assoc list with properties for your extension: `((version ,nemo-version))) (make ( ((dynld-name "nemo-vclamp") ("extensions/nemo-vclamp.scm") (compile -O -d2 -S -s extensions/nemo-vclamp.scm -j nemo-vclamp -o ,(dynld-name "nemo-vclamp")) ) ((dynld-name "nemo-vclamp.import") ("nemo-vclamp.import.scm") (compile -O2 -s nemo-vclamp.import.scm)) ) (list (dynld-name "nemo-vclamp") (dynld-name "nemo-vclamp.import")) ) (install-extension ; Name of your extension: 'nemo-vclamp ; Files to install for your extension: `(,(dynld-name "nemo-vclamp") ,(dynld-name "nemo-vclamp.import")) ; Assoc list with properties for your extension: `((version ,nemo-version))) (make ( ("nemo" ("nemo.scm") (compile -uses files -O -d2 nemo.scm)) ) "nemo") (install-program 'nemo `("nemo" ) ; Assoc list with properties for the program: `((version ,nemo-version) )) ;; From setup-header.scm by Kon Lovett (define (installation-chicken-home) (if (not (installation-prefix)) (chicken-home) (make-pathname `(,(installation-prefix) "share") "chicken") ) ) ;;; Constants & Procedures (define SHARED-DIR (installation-chicken-home)) (define NEMO-DIR (make-pathname SHARED-DIR "nemo")) ;; File Copy Operations (define (copy-file-to-nemo-dir fn) (let ([fn (->string fn)]) (copy-file fn (make-pathname NEMO-DIR fn)) ) ) ;(copy-file-to-nemo-dir "examples/hh-substrate.nemo") ;(copy-file-to-nemo-dir "examples/hh-superstrate.nemo") ;(copy-file-to-nemo-dir "examples/Khaliq03")