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

Last change on this file since 21782 was 21782, checked in by Alan Post, 11 years ago

jbogenturfa'i: rename main.scm -> main-srfi-37.scm

File size: 4.4 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 extras)
22
23(include "version.scm")
24(include "chicken-conf.scm")
25
26       ; jbogenturfahi executable
27       ;
28(make (("jbogenturfahi" ("chicken-cmd.scm"
29                         "chicken-conf.scm"
30                         "chicken-declare.scm"
31                         "main-srfi-37.scm"
32                         "jbogenturfahi.meta"
33                         "jbogenturfahi.setup"
34                         (dynld-name "jbogenturfahi"))
35       (compile ,@jbogenturfahi-cscflags
36                -o "jbogenturfahi"
37                "chicken-cmd.scm"))
38
39       ; dynamic library
40       ;
41       ((dynld-name "jbogenturfahi") ("chicken-egg.scm"
42                                      "chicken-conf.scm"
43                                      "chicken-declare.scm"
44                                      "jbogenturfahi.scm"
45                                      "jbogerna.scm"
46                                      "version.scm"
47                                      "jbogenturfahi.meta"
48                                      "jbogenturfahi.setup")
49       (begin (compile -s
50                       ,@jbogenturfahi-cscflags
51                       -j jbogenturfahi
52                       -o ,(dynld-name "jbogenturfahi")
53                       chicken-egg.scm)
54              (compile -s
55                       ,@jbogenturfahi-cscflags
56                       -o ,(dynld-name "jbogenturfahi.import")
57                       jbogenturfahi.import.scm)))
58
59       ; static library
60       ;
61       ("jbogenturfahi.o" ("chicken-egg.scm"
62                           "chicken-conf.scm"
63                           "chicken-declare.scm"
64                           "jbogenturfahi.scm"
65                           "jbogerna.scm"
66                           "version.scm"
67                           "jbogenturfahi.meta"
68                           "jbogenturfahi.setup")
69       (compile -c
70                ,@jbogenturfahi-cscflags
71                -unit jbogenturfahi
72                -o "jbogenturfahi.o"
73                "chicken-egg.scm"))
74
75       ("jbogerna.scm" ("gerna.peg"
76                        "rafske_gumgau.peg"
77                        "rafske.peg"
78                        "tamgau.peg"
79                        "jbogenturfahi.meta"
80                        "jbogenturfahi.setup")
81        (call-with-output-file "jbogerna.scm"
82          (lambda (port)
83            (let ((lefpoi (string-append (read-all "tamgau.peg")
84                                         (read-all "gerna.peg")
85                                         (read-all "rafske_gumgau.peg")
86                                         (read-all "rafske.peg")))
87                  (tamgau (string->symbol (secuxna-define-name)))
88                  (text*  (string->symbol "text*")))
89              (call-with-input-string
90                lefpoi
91                (lambda (peg)
92                  (for-each (lambda (form) (pretty-print form port))
93                            (genturfahi-peg peg))
94                  (pretty-print `(define ,tamgau ,text*)
95                                port))))))))
96
97      `("jbogenturfahi" ,(dynld-name "jbogenturfahi") "jbogenturfahi.o"))
98
99(install-extension
100  ; lo cmene vi pagbu
101  'jbogenturfahi
102
103  ; lo datnyvei vi pagbu
104  `("jbogenturfahi.o"
105    ,(dynld-name "jbogenturfahi")
106    ,(dynld-name "jbogenturfahi.import"))
107
108  ; lo se ckaji vi pagbu
109  `((static "jbogenturfahi.o")
110    (version ,jbogenturfahi-version)))
111
112(install-program
113  ; lo cmene vi pagbu
114  'jbogenturfahi-cmd
115
116  ; lo datnyvei vi pagbu
117  `("jbogenturfahi")
118
119  ; lo se ckaji vi pagbu
120  `((version ,jbogenturfahi-version)))
Note: See TracBrowser for help on using the repository browser.