source: abuse/tags/pd/abuse/i4maker.lsp @ 49

Last change on this file since 49 was 49, checked in by Sam Hocevar, 11 years ago
  • Imported original public domain release, for future reference.
File size: 5.7 KB
Line 
1(perm-space)
2
3(setq outdir "/tmp/")
4
5(defun imlib (filename) (concatenate 'string "../imlib/" filename))
6(defun i4 (filename) (concatenate 'string "../i4/" filename))
7(defun x (y) (cons y "hI"))
8
9(defun list_imlib (list)
10  (if list
11      (cons (imlib (car list)) (list_imlib (cdr list)))))
12
13(setq platform-files
14      (select platform
15              ('LINUX                       
16               (print (mapcar 'x '("hi" "there")))
17               (list_imlib
18                       '("port/unix/jdir"
19                         "port/unix/joystick"
20                         "port/x11/video"
21                         "port/x11/mouse"
22                         "port/x11/event"
23                         "port/unix/timing"
24                         )))
25
26              ('SGI
27               (list_imlib
28                       '("port/sgi/sound"
29                         "port/unix/joystick"
30                         "port/x11/video"
31                         "port/x11/mouse"
32                         "port/x11/event"
33                         "port/sgi/timing"
34                         "port/unix/jdir"
35                         )))
36              ('WATCOM
37               (list_imlib
38                       '("port/svga/video"
39                         "port/svga/mouse"
40                         "port/svga/event"
41                         "port/dos4gw/sound"
42                         "port/dos4gw/profile"
43                         "port/dos4gw/jdir"
44                         "port/dos4gw/video"
45                         "port/dos4gw/mouse"
46                         "port/dos4gw/event"
47                         "port/dos4gw/doscall"
48                         "port/dos4gw/joystick"
49                         "port/dos4gw/timing"
50                         )))
51              ))
52             
53
54
55
56(print "Generating makefile for : ")
57(print platform)
58
59(setq executable_name            "game")
60(setq c_files_used    (nconc
61                             platform-files
62                             (list_imlib
63                                     '("filter"   "gifread" "globals" "image"  "linked" "input"
64                                       "mdlread"  "palette" "ppmread" "sprite" "include" "xwdread"
65                                       "fonts"    "decoder" "loader"  "glread" "texture" "specs"
66                                       "supmorph" "image24" "pcxread" "timage" "jmalloc"
67                                       "jrand"    "lbmread" "keys"    "dprint" "status"  "visobj"
68                                       "readwav"  "packet"
69                                       "pmenu" "scroller" "filesel" "tools" "guistat"
70                                       "jwindow"
71                                       ))
72                             '("src/netcfg" 
73                               "src/text_gui"
74                               "src/innet"                     
75                               "src/net/unix/gserver" 
76                               "src/net/unix/gclient"           
77                               "src/net/unix/fileman"           
78                               "src/net/sock"
79                               "src/chat"     
80                               "src/endgame"   
81                               "src/setup"       
82                               "src/version"   
83                               "src/loadgame" 
84                               "src/profile"
85                               "src/cop"       
86                               "src/statbar"   
87                               "src/compiled"   
88                               "src/ant"       
89                               "src/sensor"
90                               "src/lisp_opt"   
91                               "src/demo"     
92                               "src/lcache"     
93                               "src/lisp_gc"
94                               "src/nfclient"   
95                               "src/username" 
96                               "src/clisp"       
97                               "src/gui"
98                               "src/transp"     
99                               "src/collide"   
100                               "src/trig"       
101                               "src/property"
102                               "src/lisp"       
103                               "src/cache"     
104                               "src/particle"   
105                               "src/objects"
106                               "src/extend"     
107                               "src/console"   
108                               "src/ability"
109                               "src/items"     
110                               "src/dev"       
111                               "src/chars"       
112                               "src/level"   
113                               "src/smallfnt"   
114                               "src/automap"
115                               "src/help"       
116                               "src/intsect"   
117                               "src/loader"       
118                               "src/seq"     
119                               "src/points"     
120                               "src/fnt6x13"   
121                               "src/morpher"     
122                               "src/menu"     
123                               "src/director"
124                               "src/view"
125                               "src/config"     
126                               "src/game"     
127                               "src/light"       
128                               "src/devsel"
129                               "src/crc"       
130                               "src/gamma"     
131                               "src/language")))
132
133
134
135(setq inc_directories (list (imlib "include") "inc" ))
136(setq libraries_used ())
137                           
138
139
140(setq targets     
141        `((,executable_name
142           ,c_files_used
143           ,libraries_used
144           ,inc_directories
145           "")))
146
147(setq cflags         "")
148(trace)
149(compile-file        (i4 "lisp/makemake.lsp"))
Note: See TracBrowser for help on using the repository browser.