52 |
# define lt_ptr char* |
# define lt_ptr char* |
53 |
# endif |
# endif |
54 |
#endif |
#endif |
55 |
|
|
56 |
|
#define MODE_CT [=(+ 1 (high-lim "string"))=] |
57 |
|
typedef void (emitScriptProc) LT_PARAMS(( int argc, char** argv )); |
58 |
|
extern emitScriptProc emitScript;[= |
59 |
|
FOR string=][= |
60 |
|
% call-proc "\nextern emitScriptProc %s;" =][= |
61 |
|
ENDFOR =] |
62 |
[= |
[= |
63 |
|
|
64 |
ELSE |
ELSE not h suffix |
65 |
|
|
66 |
=] |
=] |
67 |
#include "[=(. hdr-name)=]" |
#include "[=(. hdr-name)=]" |
68 |
[= |
[= |
69 |
|
|
|
ENDIF =][= |
|
|
|
|
70 |
FOR string |
FOR string |
71 |
|
|
72 |
=][= |
=] |
|
|
|
|
IF (== (suffix) "c") =] |
|
73 |
/* |
/* |
74 |
* [=(string-upcase! (get "str_name"))=] STRING |
* [=(string-upcase! (get "str_name"))=] STRING |
75 |
*/[= |
*/[= |
86 |
|
|
87 |
[= ENDIF =][= |
[= ENDIF =][= |
88 |
ENDIF =][= |
ENDIF =][= |
|
ENDIF "c" =][= |
|
89 |
|
|
90 |
IF (exist? "text") |
IF (exist? "text") =] |
|
|
|
|
=][= |
|
|
IF (== (suffix) "c") =] |
|
91 |
tSCC z[= (string-capitalize! (get "str_name")) =]Cmd[] = |
tSCC z[= (string-capitalize! (get "str_name")) =]Cmd[] = |
92 |
[= (out-push-new ".lt.tpl") =][= |
[= (out-push-new ".lt.tpl") =][= |
93 |
text =][= |
text =][= |
95 |
(out-push-new ".lt.xxx") =][= |
(out-push-new ".lt.xxx") =][= |
96 |
INCLUDE ".lt.tpl" =][= |
INCLUDE ".lt.tpl" =][= |
97 |
(out-pop) |
(out-pop) |
98 |
(kr-string (shell "cat .lt.xxx ; rm -f .lt.*")) =][= |
(kr-string (shell "cat .lt.xxx ; rm -f .lt.*")) =]; |
|
ENDIF =]; |
|
99 |
|
|
100 |
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */[= |
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */[= |
101 |
ENDIF =][= |
ENDIF =][= |
|
|
|
|
ENDFOR |
|
102 |
|
|
103 |
=][= |
ENDFOR =][= |
104 |
|
|
105 |
IF (== (suffix) "h") |
ENDIF c/h suffix |
106 |
|
|
107 |
=]#define MODE_CT [=(+ 1 (high-lim "string"))=] |
=] |
|
typedef void (emitScriptProc) LT_PARAMS(( int argc, char** argv )); |
|
|
extern emitScriptProc emitScript;[= |
|
|
FOR string=][= |
|
|
% call-proc "\nextern emitScriptProc %s;" =][= |
|
|
ENDFOR =][= |
|
|
ENDIF =] |
|
108 |
|
|
109 |
[=IF (== (suffix) "h")=]extern [= |
[=IF (== (suffix) "h")=]extern [= |
110 |
ENDIF=]tCC* apz_mode_explain[ MODE_CT ][= |
ENDIF=]tCC* apz_mode_explain[ MODE_CT ][= |