source: project/release/4/flsim/trunk/flsim.setup @ 30915

Last change on this file since 30915 was 30915, checked in by Ivan Raikov, 6 years ago

flsim release 3.3

File size: 2.2 KB
Line 
1;;;; -*- Hen -*-
2
3(define (dynld-name fn)         
4  (make-pathname #f fn ##sys#load-dynamic-extension))   
5
6(define version 3.3)
7
8(use make)
9
10(make (
11       ((dynld-name "flsim") ("flsim.scm" )
12        (compile -O -d2 -S -s flsim.scm -j flsim))
13
14       ((dynld-name "flsim.import") ("flsim.import.scm")
15        (compile -O -d2 -S -s flsim.import.scm))
16       )
17
18  (list (dynld-name "flsim")
19        (dynld-name "flsim.import"))
20  )
21
22(install-extension
23
24  ; Name of your extension:
25  'flsim
26
27  ; Files to install for your extension:
28  `(,(dynld-name "flsim") ,(dynld-name "flsim.import") )
29
30  ; Assoc list with properties for your extension:
31  `((version ,version)
32    ))
33
34
35(make (
36       ((dynld-name "runge-kutta") ("runge-kutta.scm" )
37        (compile -O2 -S -s runge-kutta.scm -j runge-kutta))
38
39       ((dynld-name "runge-kutta.import") ("runge-kutta.import.scm")
40        (compile -O2 -S -s runge-kutta.import.scm))
41       )
42
43  (list (dynld-name "runge-kutta")
44        (dynld-name "runge-kutta.import"))
45  )
46
47(install-extension
48
49  ; Name of your extension:
50  'runge-kutta
51
52  ; Files to install for your extension:
53  `(,(dynld-name "runge-kutta") ,(dynld-name "runge-kutta.import") )
54
55  ; Assoc list with properties for your extension:
56  `((version ,version)
57    ))
58
59
60;; From setup-header.scm by Kon Lovett
61
62(define (installation-chicken-home)
63  (if (not (installation-prefix)) (chicken-home)
64    (make-pathname `(,(installation-prefix) "share") "chicken") ) )
65
66;;; Constants & Procedures
67
68(define SHARED-DIR (installation-chicken-home))
69(define FLSIM-DIR (make-pathname SHARED-DIR "flsim"))
70
71;; File Copy Operations
72
73(define (copy-file-to-flsim-dir fn)
74  (let ([fn (->string fn)])
75    (copy-file fn (make-pathname FLSIM-DIR fn)) ) )
76
77(copy-file-to-flsim-dir "sml-lib/rk/rk.sml")
78(copy-file-to-flsim-dir "sml-lib/rk/rk.mlb")
79
80(copy-file-to-flsim-dir "sml-lib/randmtzig/randmtziglib.c")
81(copy-file-to-flsim-dir "sml-lib/randmtzig/randmtzig.sml")
82(copy-file-to-flsim-dir "sml-lib/randmtzig/randmtzig.mlb")
83
84(copy-file-to-flsim-dir "sml-lib/tensor/DynArray.sml")
85(copy-file-to-flsim-dir "sml-lib/tensor/tensor.sml")
86(copy-file-to-flsim-dir "sml-lib/tensor/sparse.sml")
87(copy-file-to-flsim-dir "sml-lib/tensor/tensor.mlb")
88(copy-file-to-flsim-dir "sml-lib/tensor/sparse.mlb")
89
90
91(copy-file-to-flsim-dir "octave-lib/ode15s.m")
Note: See TracBrowser for help on using the repository browser.