source: project/release/4/jbogenturfahi/trunk/jbogenturfahi.setup @ 22204

Last change on this file since 22204 was 22204, checked in by Alan Post, 10 years ago

jbogenturfa'i: remove second spurious ')'

File size: 9.1 KB
Line 
1;;;;
2;;;; jbogenturfahi - lo lojbo ke pe'a jajgau ratcu ke'e genturfa'i
3;;;;            `-> A Lojban grammar parser
4;;;;
5;;;; Copyright (c) 2010 ".alyn.post." <alyn.post@lodockikumazvati.org>
6;;;;
7;;;; Permission to use, copy, modify, and/or distribute this software for any
8;;;; purpose with or without fee is hereby granted, provided that the above
9;;;; copyright notice and this permission notice appear in all copies.
10;;;;
11;;;; THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12;;;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13;;;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14;;;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15;;;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16;;;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17;;;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18;;;;
19
20(use genturfahi)
21(use genturfahi-peg)
22(use extras)
23(use srfi-1)
24
25(include "version.scm")
26(include "chicken-conf.scm")
27
28(define jbogenturfahi-db-path
29        (reduce make-pathname
30                "/"
31                `(,jbogenturfahi-version
32                  "jbogenturfahi"
33                  ,(chicken-home))))
34(define jbogenturfahi-db-file
35        (make-pathname jbogenturfahi-db-path "jbogenturfahi.db"))
36
37       ; jbogenturfahi executable
38       ;
39(make (("jbogenturfahi" ("chicken-cmd.scm"
40                         "chicken-conf.scm"
41                         "chicken-declare.scm"
42                         "main-srfi-37.scm"
43                         "jbogenturfahi.meta"
44                         "jbogenturfahi.setup"
45                         (dynld-name "jbogenturfahi")
46                         (dynld-name "jbogerna")
47                         (dynld-name "jbogensamselpla"))
48       (compile ,@jbogenturfahi-cscflags
49                -o "jbogenturfahi"
50                "chicken-cmd.scm"))
51
52       ; dynamic library (jbogensamselpla)
53       ;
54       ((dynld-name "jbogensamselpla") ("chicken-ext-jbogensamselpla.scm"
55                                        "chicken-conf.scm"
56                                        "chicken-declare.scm"
57                                        "samselpla.scm"
58                                        "jbogenturfahi.meta"
59                                        "jbogenturfahi.setup")
60       (begin (compile -s
61                       ,@jbogenturfahi-cscflags
62                       -j jbogensamselpla
63                       -o ,(dynld-name "jbogensamselpla")
64                       chicken-ext-jbogensamselpla.scm)
65              (compile -s
66                       ,@jbogenturfahi-cscflags
67                       -o ,(dynld-name "jbogensamselpla.import")
68                       jbogensamselpla.import.scm)))
69
70       ; dynamic library (jbogerna)
71       ;
72       ((dynld-name "jbogerna") ("chicken-ext-jbogerna.scm"
73                                 "chicken-conf.scm"
74                                 "chicken-declare.scm"
75                                 "jbogerna.scm"
76                                 "jbogenturfahi.meta"
77                                 "jbogenturfahi.setup"
78                                 (dynld-name "jbogensamselpla"))
79       (begin (compile -s
80                       ,@jbogenturfahi-cscflags
81                       -j jbogerna
82                       -o ,(dynld-name "jbogerna")
83                       chicken-ext-jbogerna.scm)
84              (compile -s
85                       ,@jbogenturfahi-cscflags
86                       -o ,(dynld-name "jbogerna.import")
87                       jbogerna.import.scm)))
88
89       ; dynamic library (jbogenturfahi)
90       ;
91       ((dynld-name "jbogenturfahi") ("chicken-ext.scm"
92                                      "chicken-conf.scm"
93                                      "chicken-declare.scm"
94                                      "jbogenturfahi.scm"
95                                      "c0re.scm"
96                                      "sql.scm"
97                                      "db.scm"
98                                      "version.scm"
99                                      "path.scm"
100                                      "jbogenturfahi.meta"
101                                      "jbogenturfahi.setup"
102                                      (dynld-name "jbogerna"))
103       (begin (compile -s
104                       ,@jbogenturfahi-cscflags
105                       -j jbogenturfahi
106                       -o ,(dynld-name "jbogenturfahi")
107                       chicken-ext.scm)
108              (compile -s
109                       ,@jbogenturfahi-cscflags
110                       -o ,(dynld-name "jbogenturfahi.import")
111                       jbogenturfahi.import.scm)))
112
113       ; static library (jbogensamselpla)
114       ;
115       ("jbogensamselpla.o" ("chicken-ext-jbogensamselpla.scm"
116                             "chicken-conf.scm"
117                             "chicken-declare.scm"
118                             "samselpla.scm"
119                             "jbogenturfahi.meta"
120                             "jbogenturfahi.setup")
121       (compile -c
122                ,@jbogenturfahi-cscflags
123                -unit jbogensamselpla
124                -o "jbogensamselpla.o"
125                "chicken-ext-jbogensamselpla.scm"))
126
127       ; static library (jbogerna)
128       ;
129       ("jbogerna.o" ("chicken-ext-jbogerna.scm"
130                      "chicken-conf.scm"
131                      "chicken-declare.scm"
132                      "jbogerna.scm"
133                      "jbogenturfahi.meta"
134                      "jbogenturfahi.setup")
135       (compile -c
136                ,@jbogenturfahi-cscflags
137                -unit jbogerna
138                -o "jbogerna.o"
139                "chicken-ext-jbogerna.scm"))
140
141       ; static library (jbogenturfahi)
142       ;
143       ("jbogenturfahi.o" ("chicken-ext.scm"
144                           "chicken-conf.scm"
145                           "chicken-declare.scm"
146                           "jbogenturfahi.scm"
147                           "c0re.scm"
148                           "sql.scm"
149                           "db.scm"
150                           "version.scm"
151                           "path.scm"
152                           "jbogenturfahi.meta"
153                           "jbogenturfahi.setup")
154       (compile -c
155                ,@jbogenturfahi-cscflags
156                -unit jbogenturfahi
157                -o "jbogenturfahi.o"
158                "chicken-ext.scm"))
159
160       ("jbogenturfahi.db" ("chicken-db.scm"
161                            "c0re.scm"
162                            "sql.scm"
163                            "db.scm"
164                            "wordlists/cmavo.scm"
165                            "wordlists/cmavo.txt"
166                            "wordlists/gismu.txt"
167                            "wordlists/rafsi.txt"
168                            "jbogenturfahi.meta"
169                            "jbogenturfahi.setup")
170         (load "chicken-db.scm"))
171
172       ("path.scm" ("jbogenturfahi.meta"
173                    "jbogenturfahi.setup")
174         (call-with-output-file "path.scm"
175           (lambda (port)
176             (write `(define jbogenturfahi-db-path
177                             (make-parameter ,jbogenturfahi-db-file))
178                    port))))
179
180       ("jbogerna.scm" ("gerna.peg"
181                        "rafske_gumgau.peg"
182                        "rafske.peg"
183                        "tamgau.peg"
184                        "jbogenturfahi.meta"
185                        "jbogenturfahi.setup")
186         (call-with-output-file "jbogerna.scm"
187           (lambda (port)
188             (let ((lefpoi (string-append (read-all "tamgau.peg")
189                                          (read-all "gerna.peg")
190                                          (read-all "rafske_gumgau.peg")
191                                          (read-all "rafske.peg"))))
192               (for-each (lambda (form) (pretty-print form port))
193                         (genturfahi-peg lefpoi)))))))
194
195      `("jbogenturfahi.db"
196        "jbogenturfahi"
197        ,(dynld-name "jbogensamselpla")
198        ,(dynld-name "jbogerna")
199        ,(dynld-name "jbogenturfahi")
200        "jbogensamselpla.o"
201        "jbogerna.o"
202        "jbogenturfahi.o"))
203
204(install-extension
205  ; lo cmene vi pagbu
206  'jbogensamselpla
207
208  ; lo datnyvei vi pagbu
209  `("jbogensamselpla.o"
210    ,(dynld-name "jbogensamselpla")
211    ,(dynld-name "jbogensamselpla.import"))
212
213  ; lo se ckaji vi pagbu
214  `((static "jbogensamselpla.o")
215    (version ,jbogenturfahi-version)))
216
217(install-extension
218  ; lo cmene vi pagbu
219  'jbogerna
220
221  ; lo datnyvei vi pagbu
222  `("jbogerna.o"
223    ,(dynld-name "jbogerna")
224    ,(dynld-name "jbogerna.import"))
225
226  ; lo se ckaji vi pagbu
227  `((static "jbogerna.o")
228    (version ,jbogenturfahi-version)))
229
230(install-extension
231  ; lo cmene vi pagbu
232  'jbogenturfahi
233
234  ; lo datnyvei vi pagbu
235  `("jbogenturfahi.o"
236    ,(dynld-name "jbogenturfahi")
237    ,(dynld-name "jbogenturfahi.import"))
238
239  ; lo se ckaji vi pagbu
240  `((static "jbogenturfahi.o")
241    (version ,jbogenturfahi-version)))
242
243(install-program
244  ; lo cmene vi pagbu
245  'jbogenturfahi-cmd
246
247  ; lo datnyvei vi pagbu
248  `("jbogenturfahi")
249
250  ; lo se ckaji vi pagbu
251  `((version ,jbogenturfahi-version)))
252
253(if (not (setup-install-mode))
254  (exit))
255
256(create-directory/parents jbogenturfahi-db-path)
257(copy-file "jbogenturfahi.db" jbogenturfahi-db-path)
Note: See TracBrowser for help on using the repository browser.