author | Claus Gittinger <cg@exept.de> |
Mon, 21 Aug 2006 19:16:16 +0200 | |
changeset 9617 | edf60cb58ef7 |
parent 9616 | 7bd19460f53f |
child 9622 | 9846503abab1 |
permissions | -rw-r--r-- |
9526
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
1 |
" |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
2 |
COPYRIGHT (c) 2006 by eXept Software AG |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
3 |
All Rights Reserved |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
4 |
|
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
5 |
This software is furnished under a license and may be used |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
6 |
only in accordance with the terms of that license and with the |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
7 |
inclusion of the above copyright notice. This software may not |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
8 |
be provided or otherwise made available to, or used by, any |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
9 |
other person. No title to or ownership of the software is |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
10 |
hereby transferred. |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
11 |
" |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
12 |
|
9493 | 13 |
"{ Package: 'stx:libbasic3' }" |
14 |
||
9568 | 15 |
ProjectDefinition subclass:#LibraryDefinition |
9616 | 16 |
instanceVariableNames:'' |
17 |
classVariableNames:'' |
|
18 |
poolDictionaries:'' |
|
19 |
category:'System-Support-Projects' |
|
9493 | 20 |
! |
21 |
||
9568 | 22 |
!LibraryDefinition class methodsFor:'documentation'! |
9526
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
23 |
|
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
24 |
copyright |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
25 |
" |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
26 |
COPYRIGHT (c) 2006 by eXept Software AG |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
27 |
All Rights Reserved |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
28 |
|
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
29 |
This software is furnished under a license and may be used |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
30 |
only in accordance with the terms of that license and with the |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
31 |
inclusion of the above copyright notice. This software may not |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
32 |
be provided or otherwise made available to, or used by, any |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
33 |
other person. No title to or ownership of the software is |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
34 |
hereby transferred. |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
35 |
" |
6760ab786028
changed name from '..._Definition' to '...'
Claus Gittinger <cg@exept.de>
parents:
9517
diff
changeset
|
36 |
! ! |
9493 | 37 |
|
9568 | 38 |
!LibraryDefinition class methodsFor:'defaults'! |
9533 | 39 |
|
9534 | 40 |
defaultDescription |
41 |
^ 'a classLibrary' |
|
9493 | 42 |
! ! |
43 |
||
9576 | 44 |
!LibraryDefinition class methodsFor:'description - project information'! |
45 |
||
46 |
description |
|
47 |
"Returns a description string which will appear in nt.def / bc.def" |
|
48 |
||
49 |
self module = 'stx' ifTrue:[ |
|
50 |
^ 'Smalltalk/X Class library' |
|
51 |
]. |
|
52 |
||
9586 | 53 |
^ 'Class Library' |
9576 | 54 |
|
55 |
"Created: / 17-08-2006 / 20:52:16 / cg" |
|
9586 | 56 |
"Modified: / 18-08-2006 / 16:15:53 / cg" |
9576 | 57 |
! ! |
58 |
||
9568 | 59 |
!LibraryDefinition class methodsFor:'file generation'! |
9493 | 60 |
|
9534 | 61 |
fileNamesToGenerate |
62 |
^ #( |
|
9604 | 63 |
#('Make.proto' #'generate_make_dot_proto') |
64 |
#('Make.spec' #'generate_make_dot_spec') |
|
65 |
#('libInit.cc' #'generate_libInit_dot_cc') |
|
66 |
#('bc.def' #'generate_bc_dot_def') |
|
67 |
#('nt.mak' #'generate_nt_dot_mak') |
|
9576 | 68 |
" |
9604 | 69 |
#('nt.def' #'generate_nt_dot_def') |
9576 | 70 |
" |
9604 | 71 |
#('abbrev.stc' #'generate_abbrev_dot_stc') |
72 |
#('bmake.bat' #'generate_bmake_dot_mak') |
|
9534 | 73 |
) |
9576 | 74 |
|
75 |
"Modified: / 17-08-2006 / 20:03:00 / cg" |
|
9582 | 76 |
! |
77 |
||
78 |
generate_libInit_dot_cc |
|
79 |
||
80 |
^self replaceMappings: self libInit_dot_cc_mappings |
|
81 |
in: self libInit_dot_cc |
|
82 |
||
83 |
" |
|
84 |
DapasXProject generate_libInit_dot_cc |
|
85 |
DapasX_Datenbasis generate_libInit_dot_cc |
|
86 |
||
87 |
" |
|
88 |
||
89 |
"Created: / 08-08-2006 / 12:47:16 / fm" |
|
90 |
"Modified: / 09-08-2006 / 11:30:52 / fm" |
|
9493 | 91 |
! ! |
92 |
||
9568 | 93 |
!LibraryDefinition class methodsFor:'file templates'! |
9493 | 94 |
|
95 |
bc_dot_def |
|
9576 | 96 |
"the template code for the bc.def file" |
9493 | 97 |
|
98 |
^ |
|
9608 | 99 |
'LIBRARY %(LIBRARY_NAME) |
9493 | 100 |
DESCRIPTION %(DESCRIPTION) |
101 |
CODE PRELOAD MOVEABLE DISCARDABLE |
|
102 |
SEGMENTS |
|
103 |
INITCODE PRELOAD DISCARDABLE |
|
104 |
EXPORTS |
|
9590 | 105 |
__%(LIBRARY_NAME)_Init @1 |
9504 | 106 |
' |
9493 | 107 |
|
108 |
"Created: / 08-08-2006 / 12:26:58 / fm" |
|
109 |
"Modified: / 08-08-2006 / 19:32:27 / fm" |
|
9590 | 110 |
"Modified: / 18-08-2006 / 17:13:45 / cg" |
9493 | 111 |
! |
112 |
||
113 |
classLine_libInit_dot_cc |
|
114 |
||
115 |
^'_%(CLASS)_Init(pass,__pRT__,snd);' |
|
116 |
||
117 |
"Created: / 08-08-2006 / 12:51:44 / fm" |
|
118 |
"Modified: / 08-08-2006 / 15:46:05 / fm" |
|
119 |
! |
|
120 |
||
121 |
extensionLine_libInit_dot_cc |
|
122 |
||
123 |
^'_%(LIBRARY_NAME)_extensions_Init(pass,__pRT__,snd);' |
|
124 |
||
125 |
"Created: / 08-08-2006 / 15:48:56 / fm" |
|
126 |
"Modified: / 08-08-2006 / 19:32:33 / fm" |
|
127 |
! |
|
128 |
||
129 |
libInit_dot_cc |
|
9576 | 130 |
"the template code for the libInit.cc file" |
9493 | 131 |
|
132 |
^ |
|
133 |
'/* |
|
9576 | 134 |
* $','Header','$ |
135 |
* |
|
9493 | 136 |
* DO NOT EDIT |
9576 | 137 |
* automagically generated from the projectDefinition: ',self name,'. |
9493 | 138 |
*/ |
139 |
#define __INDIRECTVMINITCALLS__ |
|
140 |
#include <stc.h> |
|
141 |
#define INIT_TEXT_SECT /* as nothing */ |
|
142 |
#ifdef WIN32 |
|
143 |
# pragma codeseg INITCODE "INITCODE" |
|
144 |
#else /* not WIN32 */ |
|
145 |
# if defined(__GNUC__) && !!defined(NO_SECTION_ATTRIBUTES) |
|
146 |
# if (__GNUC__ == 2 && __GNUC_MINOR__ >= 7) || __GNUC__ > 2 |
|
147 |
# undef INIT_TEXT_SECT |
|
148 |
# define INIT_TEXT_SECT __attribute__((section(".stxitext"))) |
|
149 |
# endif |
|
150 |
# endif /* not GNUC */ |
|
151 |
#endif /* not WIN32 */ |
|
152 |
#ifdef INIT_TEXT_SECT |
|
153 |
extern void _%(LIBRARY_NAME)_Init() INIT_TEXT_SECT; |
|
154 |
#endif |
|
155 |
void _%(LIBRARY_NAME)_Init(pass, __pRT__, snd) |
|
156 |
OBJ snd; struct __vmData__ *__pRT__; { |
|
157 |
__BEGIN_PACKAGE2__("%(LIBRARY_NAME)", _%(LIBRARY_NAME)_Init, "%(PACKAGE)"); |
|
158 |
%(CLASSES) |
|
159 |
%(EXTENSION) |
|
160 |
__END_PACKAGE__(); |
|
161 |
}' |
|
162 |
||
163 |
"Created: / 08-08-2006 / 12:40:45 / fm" |
|
164 |
"Modified: / 08-08-2006 / 19:33:01 / fm" |
|
9576 | 165 |
"Modified: / 18-08-2006 / 12:57:02 / cg" |
166 |
! |
|
167 |
||
168 |
lib_dot_rc |
|
169 |
||
170 |
^ |
|
171 |
'/*------------------------------------------------------------------------ |
|
172 |
* $','Header','$ |
|
173 |
* |
|
174 |
* DO NOT EDIT |
|
175 |
* automagically generated from the projectDefinition: ',self name,'. |
|
176 |
*------------------------------------------------------------------------*/ |
|
177 |
||
178 |
// #if (__BORLANDC__ < 0x0550) |
|
179 |
// #include <ver.h> |
|
180 |
// #endif |
|
181 |
||
182 |
VS_VERSION_INFO VERSIONINFO |
|
183 |
FILEVERSION %(FILEVERSION) |
|
184 |
PRODUCTVERSION %(PRODUCTVERSION) |
|
185 |
FILEFLAGSMASK VS_FF_DEBUG | VS_FF_PRERELEASE |
|
186 |
FILEFLAGS VS_FF_PRERELEASE | VS_FF_SPECIALBUILD |
|
187 |
FILEOS VOS_NT_WINDOWS32 |
|
188 |
FILETYPE %(FILETYPE) |
|
189 |
FILESUBTYPE VS_USER_DEFINED |
|
190 |
||
191 |
BEGIN |
|
192 |
BLOCK "StringFileInfo" |
|
193 |
BEGIN |
|
194 |
BLOCK "040904E4" |
|
195 |
BEGIN |
|
196 |
VALUE "CompanyName", %(COMPANYNAME) |
|
197 |
VALUE "FileDescription", "Smalltalk/X Additional Developer Basic Classes Library\0" |
|
198 |
VALUE "FileVersion", "5.2.8.1\0" |
|
199 |
VALUE "InternalName", "libbasic3\0" |
|
200 |
VALUE "LegalCopyright", "Copyright eXept Software AG 1998-2006\0" |
|
201 |
VALUE "ProductName", "Smalltalk/X\0" |
|
202 |
VALUE "ProductVersion", "5.2.8.1\0" |
|
203 |
END |
|
204 |
||
205 |
END |
|
206 |
||
207 |
BLOCK "VarFileInfo" |
|
208 |
BEGIN // Language | Translation |
|
209 |
VALUE "Translation", 0x409, 0x4E4 // U.S. English, Windows Multilingual |
|
210 |
END |
|
211 |
END |
|
212 |
' |
|
213 |
||
214 |
"Created: / 17-08-2006 / 19:37:50 / cg" |
|
215 |
"Modified: / 18-08-2006 / 12:57:09 / cg" |
|
9493 | 216 |
! |
217 |
||
218 |
make_dot_proto |
|
219 |
||
220 |
^ |
|
9576 | 221 |
'# $','Header','$ |
222 |
# |
|
223 |
# DO NOT EDIT |
|
224 |
# automagically generated from the projectDefinition: ',self name,'. |
|
225 |
# |
|
9493 | 226 |
# Warning: once you modify this file, do not rerun |
9576 | 227 |
# stmkmp or projectDefinition-build again - otherwise, your changes are lost. |
9493 | 228 |
# |
229 |
# The Makefile as generated by this Make.proto supports the following targets: |
|
230 |
# make - compile all st-files to a classLib |
|
231 |
# make clean - clean all temp files |
|
232 |
# make clobber - clean all |
|
9576 | 233 |
# |
234 |
# This file contains definitions for Unix based platforms. |
|
9493 | 235 |
|
236 |
# |
|
237 |
# position (of this package) in directory hierarchy: |
|
238 |
# (must point to ST/X top directory, for tools and includes) |
|
239 |
TOP=%(TOP) |
|
240 |
||
241 |
||
242 |
# subdirectories where targets are to be made: |
|
243 |
SUBDIRS=%(SUBDIRECTORIES) |
|
244 |
||
245 |
||
246 |
# subdirectories where Makefiles are to be made: |
|
247 |
# (only define if different from SUBDIRS) |
|
248 |
# ALLSUBDIRS= |
|
249 |
||
250 |
||
251 |
# if your embedded C code requires any system includes, |
|
252 |
# add the path(es) here:, |
|
253 |
# ********** OPTIONAL: MODIFY the next lines *** |
|
254 |
# LOCALINCLUDES=-Ifoo -Ibar |
|
255 |
LOCALINCLUDES=%(LOCAL_INCLUDES) |
|
256 |
||
257 |
||
258 |
# if you need any additional defines for embedded C code, |
|
259 |
# add them here:, |
|
260 |
# ********** OPTIONAL: MODIFY the next lines *** |
|
261 |
# LOCALDEFINES=-Dfoo -Dbar -DDEBUG |
|
262 |
LOCALDEFINES=%(LOCAL_DEFINES) |
|
263 |
||
264 |
||
9582 | 265 |
PACKAGE=$(MODULE):$(MODULE_DIR) |
9613 | 266 |
STCLOCALOPT=''-package=$(PACKAGE)'' -I. $(LOCALINCLUDES) $(STCLOCALOPTIMIZATIONS) $(STCWARNINGS) $(LOCALDEFINES) %(HEADEROUTPUTARG) %(COMMONSYMFLAG) -varPrefix=$(LIBNAME) |
9493 | 267 |
|
268 |
||
269 |
# ********** OPTIONAL: MODIFY the next line *** |
|
270 |
# additional C-libraries that should be pre-linked with the class-objects |
|
271 |
LD_OBJ_LIBS= |
|
272 |
||
273 |
||
274 |
# ********** OPTIONAL: MODIFY the next line *** |
|
275 |
# additional C targets or libraries should be added below |
|
276 |
LOCAL_EXTRA_TARGETS= |
|
277 |
||
9606 | 278 |
OBJS= $(COMMON_OBJS) $(UNIX_OBJS) |
279 |
||
9493 | 280 |
all:: preMake classLibRule postMake |
281 |
||
282 |
||
283 |
# add more install actions here |
|
284 |
install:: |
|
285 |
||
286 |
# add more install actions for aux-files (resources) here |
|
287 |
installAux:: |
|
288 |
||
289 |
# add more preMake actions here |
|
290 |
preMake:: |
|
291 |
||
292 |
# add more postMake actions here |
|
293 |
postMake:: cleanjunk |
|
294 |
||
295 |
cleanjunk:: |
|
296 |
||
297 |
clean:: |
|
9576 | 298 |
%(TAB)-rm -f *.o *.H |
9493 | 299 |
|
300 |
clobber:: |
|
9576 | 301 |
%(TAB)-rm -f *.so *.dll |
9493 | 302 |
|
303 |
', |
|
304 |
" |
|
305 |
$(INSTALLBASE):: |
|
9576 | 306 |
%(TAB)@test -d $@ || mkdir $@ |
9493 | 307 |
|
308 |
$(INSTALLBASE)/packages:: $(INSTALLBASE) |
|
9576 | 309 |
%(TAB)@test -d $@ || mkdir $@ |
9493 | 310 |
|
311 |
$(INSTALLBASE)/packages/$(MODULE):: $(INSTALLBASE)/packages |
|
9576 | 312 |
%(TAB)@test -d $@ || mkdir $@ |
9493 | 313 |
|
314 |
$(INSTALLBASE)/packages/$(MODULE)/dapasx:: $(INSTALLBASE)/packages/$(MODULE) |
|
9576 | 315 |
%(TAB)@test -d $@ || mkdir $@ |
9493 | 316 |
|
317 |
$(INSTALLBASE)/packages/$(MODULE)/dapasx/interactiver_editor:: $(INSTALLBASE)/packages/$(MODULE)/dapasx |
|
9576 | 318 |
%(TAB)@test -d $@ || mkdir $@ |
9493 | 319 |
|
320 |
$(INSTALLBASE)/packages/$(MODULE)/$(MODULE_DIR):: $(INSTALLBASE)/packages/$(MODULE) |
|
9576 | 321 |
%(TAB)@test -d $@ || mkdir $@ |
9493 | 322 |
" |
323 |
' |
|
324 |
# if other things are to be compiled, |
|
325 |
# add target definitions here, |
|
326 |
# and list them in LOCAL_EXTRA_TARGETS above. |
|
327 |
# (care for make syntax - TABS are required in the actions) |
|
328 |
# foo: foo.o |
|
9576 | 329 |
#%(TAB)$(CC) -o foo foo.o |
9493 | 330 |
|
331 |
# ''make depend'' will add dependency info between |
|
332 |
# BEGIN...END below |
|
333 |
# |
|
334 |
# BEGINMAKEDEPEND --- do not remove this line; make depend needs it |
|
335 |
# ENDMAKEDEPEND --- do not remove this line |
|
336 |
||
337 |
' |
|
338 |
||
339 |
"Created: / 08-08-2006 / 20:45:36 / fm" |
|
340 |
"Modified: / 09-08-2006 / 16:50:23 / fm" |
|
9582 | 341 |
"Modified: / 18-08-2006 / 15:32:40 / cg" |
9493 | 342 |
! |
343 |
||
344 |
make_dot_spec |
|
345 |
||
346 |
^ |
|
9576 | 347 |
'# $','Header','$ |
348 |
# |
|
349 |
# DO NOT EDIT |
|
350 |
# automagically generated from the projectDefinition: ',self name,'. |
|
9493 | 351 |
# |
352 |
# Warning: once you modify this file, do not rerun |
|
9576 | 353 |
# stmkmp or projectDefinition-build again - otherwise, your changes are lost. |
9493 | 354 |
# |
9576 | 355 |
# This file contains specifications which are common to all platforms. |
9493 | 356 |
# |
357 |
||
9576 | 358 |
# Do NOT CHANGE THESE DEFINITIONS |
359 |
# (otherwise, ST/X will have a hard time to find out the packages location from its packageID, |
|
360 |
# to find the source code of a class and to find the library for a package) |
|
9493 | 361 |
MODULE=%(MODULE) |
362 |
MODULE_DIR=%(MODULE_DIRECTORY) |
|
363 |
LIBNAME=%(LIBRARY_NAME) |
|
364 |
||
365 |
||
9576 | 366 |
# Argument(s) to the stc compiler (stc --usage). |
9493 | 367 |
# -H. : create header files locally |
368 |
# (if removed, they will be created as common |
|
369 |
# -Pxxx : defines the package |
|
370 |
# -Zxxx : a prefix for variables within the classLib |
|
371 |
# -Dxxx : defines passed to to CC for inline C-code |
|
372 |
# -Ixxx : include path passed to CC for inline C-code |
|
373 |
# +optspace : optimized for space |
|
374 |
# +optspace2 : optimized more for space |
|
375 |
# +optspace3 : optimized even more for space |
|
376 |
# +optinline : generate inline code for some ST constructs |
|
377 |
# +inlineNew : additionally inline new |
|
378 |
# +inlineMath : additionally inline some floatPnt math stuff |
|
379 |
# |
|
380 |
# ********** OPTIONAL: MODIFY the next line(s) *** |
|
381 |
# STCLOCALOPTIMIZATIONS=+optinline +inlineNew |
|
382 |
# STCLOCALOPTIMIZATIONS=+optspace3 |
|
9576 | 383 |
STCLOCALOPTIMIZATIONS=%(STCOPTIMIZATIONOPTIONS) |
9493 | 384 |
|
385 |
||
9576 | 386 |
# Argument(s) to the stc compiler (stc --usage). |
9493 | 387 |
# -warn : no warnings |
388 |
# -warnNonStandard : no warnings about ST/X extensions |
|
389 |
# -warnEOLComments : no warnings about EOL comment extension |
|
390 |
# -warnPrivacy : no warnings about privateClass extension |
|
391 |
# |
|
392 |
# ********** OPTIONAL: MODIFY the next line(s) *** |
|
393 |
# STCWARNINGS=-warn |
|
394 |
# STCWARNINGS=-warnNonStandard |
|
395 |
# STCWARNINGS=-warnEOLComments |
|
9576 | 396 |
STCWARNINGS=%(STCWARNINGOPTIONS) |
397 |
||
9493 | 398 |
%(OBJECTS) |
399 |
' |
|
400 |
||
401 |
"Created: / 08-08-2006 / 19:31:29 / fm" |
|
402 |
"Modified: / 09-08-2006 / 15:10:57 / fm" |
|
9582 | 403 |
"Modified: / 18-08-2006 / 15:32:02 / cg" |
9493 | 404 |
! |
405 |
||
406 |
nt_dot_def |
|
407 |
||
408 |
^ |
|
409 |
'LIBRARY %(LIBRARY_NAME) |
|
410 |
DESCRIPTION %(DESCRIPTION) |
|
411 |
VERSION %(VERSION_NUMBER) |
|
412 |
CODE EXECUTE READ |
|
413 |
DATA READ WRITE |
|
414 |
SECTIONS |
|
415 |
INITCODE READ EXECUTE |
|
416 |
INITDATA READ WRITE |
|
417 |
EXPORTS |
|
418 |
_%(LIBRARY_NAME)_Init @1 |
|
419 |
IMPORTS' |
|
420 |
||
421 |
"Modified: / 08-08-2006 / 19:33:14 / fm" |
|
422 |
! |
|
423 |
||
424 |
nt_dot_mak |
|
425 |
||
426 |
^ |
|
9576 | 427 |
'# $','Header','$ |
428 |
# |
|
429 |
# DO NOT EDIT |
|
430 |
# automagically generated from the projectDefinition: ',self name,'. |
|
9493 | 431 |
# |
432 |
# Warning: once you modify this file, do not rerun |
|
9576 | 433 |
# stmkmp or projectDefinition-build again - otherwise, your changes are lost. |
434 |
# |
|
435 |
# This file contains make rules for the win32 platform (using borland-bcc). |
|
9493 | 436 |
# |
437 |
TOP=%(TOP) |
|
438 |
||
439 |
!!INCLUDE $(TOP)\rules\stdHeader_nt |
|
440 |
||
441 |
!!INCLUDE Make.spec |
|
442 |
||
443 |
LOCALINCLUDES=%(LOCAL_INCLUDES) |
|
444 |
||
9582 | 445 |
PACKAGE=$(MODULE):$(MODULE_DIR) |
9613 | 446 |
STCLOCALOPT=''-package=$(PACKAGE)'' -I. $(LOCALINCLUDES) %(HEADEROUTPUTARG) $(STCLOCALOPTIMIZATIONS) $(STCWARNINGS) $(LOCALDEFINES) %(COMMONSYMFLAG) -varPrefix=$(LIBNAME) |
9576 | 447 |
RESFILES=%(RESFILENAME) |
9493 | 448 |
|
9606 | 449 |
OBJS= $(COMMON_OBJS) $(WIN32_OBJS) |
450 |
||
9576 | 451 |
ALL:: $(LIBDIR)\$(LIBNAME).lib $(BINDIR)\$(LIBNAME).dll |
9493 | 452 |
|
453 |
!!INCLUDE $(TOP)\rules\stdRules_nt |
|
454 |
||
455 |
# BEGINMAKEDEPEND --- do not remove this line; make depend needs it |
|
456 |
# ENDMAKEDEPEND --- do not remove this line |
|
457 |
' |
|
458 |
||
459 |
"Created: / 09-08-2006 / 11:44:20 / fm" |
|
460 |
"Modified: / 09-08-2006 / 19:59:32 / fm" |
|
9590 | 461 |
"Modified: / 18-08-2006 / 17:18:55 / cg" |
9493 | 462 |
! |
463 |
||
464 |
objectLine_make_dot_spec |
|
465 |
||
9608 | 466 |
^' %(CLASSFILE).$(O) \' |
9493 | 467 |
|
468 |
"Created: / 08-08-2006 / 20:16:46 / fm" |
|
469 |
! ! |
|
470 |
||
9568 | 471 |
!LibraryDefinition class methodsFor:'mappings'! |
9493 | 472 |
|
473 |
bc_dot_def_mappings |
|
9534 | 474 |
^ (super bc_dot_def_mappings) |
9504 | 475 |
at:#'LIBRARY_NAME' put:[ self libraryName ]; |
476 |
yourself |
|
9493 | 477 |
|
478 |
"Created: / 09-08-2006 / 11:17:59 / fm" |
|
9543 | 479 |
"Modified: / 16-08-2006 / 18:19:25 / User" |
9590 | 480 |
"Modified: / 18-08-2006 / 17:14:00 / cg" |
9493 | 481 |
! |
482 |
||
483 |
classLine_libInit_dot_cc_mappings: aClassName |
|
484 |
||
485 |
^Dictionary new |
|
9530 | 486 |
at: #'CLASS' put: [self st2c:aClassName]; |
9493 | 487 |
yourself |
488 |
||
489 |
"Created: / 08-08-2006 / 14:04:00 / fm" |
|
490 |
"Modified: / 09-08-2006 / 18:27:07 / fm" |
|
491 |
! |
|
492 |
||
493 |
extensionLine_libInit_dot_cc_mappings |
|
494 |
||
495 |
^Dictionary new |
|
496 |
at: #'LIBRARY_NAME' put: [self libraryName]; |
|
497 |
yourself |
|
498 |
||
499 |
"Created: / 09-08-2006 / 11:19:59 / fm" |
|
500 |
! |
|
501 |
||
502 |
libInit_dot_cc_mappings |
|
503 |
||
504 |
^Dictionary new |
|
9543 | 505 |
at: #'LIBRARY_NAME' put: [self libraryName]; |
9493 | 506 |
at: #'PACKAGE' put: [self package]; |
507 |
at: #'CLASSES' put: [self generateClassLines_libInit_dot_cc]; |
|
508 |
at: #'EXTENSION' put: [self generateExtensionLine_libInit_dot_cc]; |
|
509 |
||
510 |
yourself |
|
511 |
||
512 |
"Created: / 09-08-2006 / 11:20:24 / fm" |
|
9543 | 513 |
"Modified: / 16-08-2006 / 18:19:03 / User" |
9493 | 514 |
! |
515 |
||
9576 | 516 |
lib_dot_rc_mappings |
9493 | 517 |
|
518 |
^Dictionary new |
|
9576 | 519 |
at: #'FILEVERSION' put: ['5,2,8,1']; |
520 |
at: #'PRODUCTVERSION' put: ['5,2,8,1']; |
|
521 |
at: #'FILETYPE' put: 'VFT_DLL'; |
|
9493 | 522 |
yourself |
523 |
||
9576 | 524 |
"Created: / 17-08-2006 / 19:35:05 / cg" |
525 |
! |
|
526 |
||
527 |
make_dot_proto_mappings |
|
528 |
^ Dictionary new |
|
529 |
at: #'TAB' put: ( Character tab asString ); |
|
530 |
at: #'TOP' put: ( self unixPathToTop ); |
|
531 |
at: #'SUBDIRECTORIES' put: [self generateSubDirectories]; |
|
532 |
at: #'LOCAL_INCLUDES' put: [self generateUnixLocalIncludes]; |
|
533 |
at: #'LOCAL_DEFINES' put: ''; |
|
534 |
at: #'COMMONSYMFLAG' put: (self commonSymbolsFlag); |
|
9594 | 535 |
at: #'HEADEROUTPUTARG' put: (self headerFileOutputArg); |
9576 | 536 |
yourself |
537 |
||
9493 | 538 |
"Created: / 09-08-2006 / 11:20:45 / fm" |
539 |
"Modified: / 09-08-2006 / 16:44:48 / fm" |
|
9576 | 540 |
"Modified: / 18-08-2006 / 12:59:05 / cg" |
9493 | 541 |
! |
542 |
||
543 |
make_dot_spec_mappings |
|
9576 | 544 |
|d| |
9493 | 545 |
|
9576 | 546 |
d := super make_dot_spec_mappings. |
547 |
d |
|
548 |
at: #'LIBRARY_NAME' put: ( self libraryName ); |
|
9594 | 549 |
at: #'OBJECTS' put: [self generateObjects_make_dot_spec]; |
550 |
yourself. |
|
9576 | 551 |
^ d |
9493 | 552 |
|
553 |
"Created: / 09-08-2006 / 11:21:06 / fm" |
|
9576 | 554 |
"Modified: / 18-08-2006 / 11:45:18 / cg" |
9493 | 555 |
! |
556 |
||
557 |
nt_dot_def_mappings |
|
558 |
||
559 |
^Dictionary new |
|
560 |
at: #'LIBRARY_NAME' put: [self libraryName]; |
|
9504 | 561 |
at: #'DESCRIPTION' put: [self description storeString]; |
9493 | 562 |
at: #'VERSION_NUMBER' put: [self versionNumber]; |
563 |
yourself |
|
564 |
||
565 |
"Created: / 09-08-2006 / 11:21:21 / fm" |
|
566 |
! |
|
567 |
||
568 |
nt_dot_mak_mappings |
|
9590 | 569 |
|d resFileName| |
570 |
||
571 |
resFileName := (self package copyFrom:(self package lastIndexOfAny:':/')+1),'.res'. |
|
9493 | 572 |
|
9576 | 573 |
d := super nt_dot_mak_mappings. |
574 |
d |
|
575 |
at: #'LOCAL_INCLUDES' put: [self generateMsdosLocalIncludes]; |
|
576 |
at: #'COMMONSYMFLAG' put: (self commonSymbolsFlag); |
|
9594 | 577 |
at: #'HEADEROUTPUTARG' put: (self headerFileOutputArg); |
578 |
at: #'RESFILENAME' put: resFileName; |
|
579 |
yourself. |
|
9576 | 580 |
^ d. |
9493 | 581 |
|
582 |
"Created: / 09-08-2006 / 11:44:36 / fm" |
|
583 |
"Modified: / 09-08-2006 / 20:00:01 / fm" |
|
9590 | 584 |
"Modified: / 18-08-2006 / 17:20:25 / cg" |
9493 | 585 |
! |
586 |
||
587 |
objectLine_make_dot_spec_mappings: aClassName |
|
588 |
||
589 |
^Dictionary new |
|
9608 | 590 |
at: #'CLASSFILE' put: [(Smalltalk classNamed:aClassName) classFilename asFilename withoutSuffix baseName]; |
9493 | 591 |
yourself |
592 |
||
593 |
"Created: / 08-08-2006 / 20:17:28 / fm" |
|
594 |
"Modified: / 09-08-2006 / 18:26:52 / fm" |
|
595 |
! |
|
596 |
||
9530 | 597 |
st2c:aString |
598 |
^ (aString asString |
|
599 |
copyReplaceString:'_' withString:('_',($_ codePoint printStringRadix:8))) |
|
600 |
replaceAny:':' with:$_ |
|
9493 | 601 |
! ! |
602 |
||
9568 | 603 |
!LibraryDefinition class methodsFor:'mappings support'! |
9493 | 604 |
|
9576 | 605 |
commonSymbolsFlag |
606 |
"some libraries are compiled with COMMONSYMBOLS - |
|
607 |
This saves a lot of space in the generated dll/so files; |
|
608 |
However, it also requires the librun to be rebuilt, whenever one of |
|
609 |
the commonSymbols-libs changes. |
|
610 |
Therefore, NEVER do this for end-user or application libraries; |
|
611 |
ONLY do it for a subset of the predefined, exept-provided standard stx libraries" |
|
9493 | 612 |
|
9576 | 613 |
( |
614 |
#( |
|
615 |
'stx:libbasic' 'stx:libview' 'stx:libtool' |
|
616 |
'stx:libbasic2' 'stx:libview2' 'stx:libtool2' |
|
617 |
'stx:libbasic3' 'stx:libwidg' 'stx:libhtml' |
|
618 |
'stx:libcomp' 'stx:libwidg2' 'stx:libui' |
|
9596 | 619 |
'stx:libboss' 'stx:libdb' |
9576 | 620 |
) |
621 |
includes:self package) ifTrue:[ |
|
622 |
^ '$(COMMONSYMBOLS)' |
|
623 |
]. |
|
624 |
^ '' |
|
9547 | 625 |
|
9576 | 626 |
"Created: / 18-08-2006 / 13:01:52 / cg" |
627 |
! |
|
628 |
||
629 |
generateClassLines_libInit_dot_cc |
|
630 |
^ String streamContents:[:s | |
|
9582 | 631 |
|putLineForClassName| |
632 |
||
633 |
putLineForClassName := [:className | |
|
634 |
|newClassLine mappings| |
|
9576 | 635 |
|
9582 | 636 |
mappings := self classLine_libInit_dot_cc_mappings: className. |
637 |
newClassLine := self replaceMappings:mappings in:self classLine_libInit_dot_cc. |
|
638 |
s nextPutLine: newClassLine |
|
639 |
]. |
|
640 |
||
9616 | 641 |
self common_compiled_classNames do:putLineForClassName. |
642 |
||
9606 | 643 |
#( |
644 |
('UNIX' #unix) |
|
645 |
('WIN32' #win32) |
|
646 |
('VMS' #vms) |
|
647 |
('BEOS' #beos) |
|
648 |
) pairsDo:[:ifdef :id| |
|
649 |
|classes| |
|
650 |
||
651 |
classes := self compiled_classNamesForArchitecture:id. |
|
652 |
classes notEmpty ifTrue:[ |
|
653 |
s nextPutLine: '#ifdef ',ifdef. |
|
654 |
classes do:putLineForClassName. |
|
655 |
s nextPutLine: '#endif /* ',ifdef,' */'. |
|
656 |
]. |
|
9582 | 657 |
]. |
9493 | 658 |
] |
659 |
||
9576 | 660 |
" |
661 |
bosch_dapasx_datenbasis generateClassLines_libInit_dot_cc |
|
662 |
bosch_dapasx_kernel generateClassLines_libInit_dot_cc |
|
663 |
stx_libbasic3 generateClassLines_libInit_dot_cc |
|
664 |
" |
|
9493 | 665 |
|
666 |
"Created: / 09-08-2006 / 11:21:48 / fm" |
|
9547 | 667 |
"Modified: / 16-08-2006 / 18:52:10 / User" |
9616 | 668 |
"Modified: / 21-08-2006 / 18:47:21 / cg" |
9493 | 669 |
! |
670 |
||
671 |
generateExtensionLine_libInit_dot_cc |
|
9576 | 672 |
|mappings| |
9493 | 673 |
|
9576 | 674 |
^self extensionMethodNames isEmpty |
675 |
ifTrue:[''] |
|
676 |
ifFalse:[ |
|
677 |
mappings := self extensionLine_libInit_dot_cc_mappings. |
|
678 |
self replaceMappings: mappings in: self extensionLine_libInit_dot_cc.] |
|
679 |
||
680 |
" |
|
681 |
DapasXProject generateExtensionLine_libInit_dot_cc |
|
682 |
DapasX_Datenbasis generateExtensionLine_libInit_dot_cc |
|
683 |
" |
|
9493 | 684 |
|
685 |
"Created: / 09-08-2006 / 11:23:34 / fm" |
|
9576 | 686 |
"Modified: / 18-08-2006 / 12:00:18 / cg" |
9493 | 687 |
! |
688 |
||
9503 | 689 |
generateMsdosLocalIncludes |
9576 | 690 |
^ String streamContents:[:s | |
691 |
self searchForProjectsWhichProvideHeaderFiles |
|
692 |
do:[:includeProjectName | |
|
693 |
s nextPutAll:' -I',(self msdosPathToPackage: includeProjectName) |
|
694 |
] |
|
9493 | 695 |
] |
696 |
||
9576 | 697 |
" |
698 |
DapasXProject generateLocalIncludes |
|
699 |
DapasX_Datenbasis generateLocalIncludes |
|
700 |
" |
|
9493 | 701 |
|
702 |
"Created: / 09-08-2006 / 16:46:49 / fm" |
|
9576 | 703 |
"Modified: / 18-08-2006 / 11:58:40 / cg" |
9493 | 704 |
! |
705 |
||
706 |
generateObjects_make_dot_spec |
|
9504 | 707 |
|pivateClassesOf classes| |
9493 | 708 |
|
9606 | 709 |
classes := self compiled_classes_common. |
9504 | 710 |
pivateClassesOf := IdentityDictionary new. |
711 |
classes do:[:each | pivateClassesOf at:each put:(each allPrivateClasses)]. |
|
712 |
||
713 |
classes topologicalSort:[:a :b | |
|
714 |
"/ a must come before b iff: |
|
715 |
"/ b is a subclass of a |
|
716 |
"/ b has a private class which is a subclass of a |
|
717 |
||
718 |
|mustComeBefore pivateClassesOfB| |
|
9533 | 719 |
|
720 |
mustComeBefore := false. |
|
721 |
(a isSharedPool and:[(b sharedPools includes: a name)]) ifTrue:[ |
|
722 |
mustComeBefore := true |
|
723 |
]. |
|
724 |
||
725 |
mustComeBefore := mustComeBefore or:[b isSubclassOf:a]. |
|
9504 | 726 |
pivateClassesOfB := pivateClassesOf at:b. |
727 |
pivateClassesOfB do:[:eachClassInB | |
|
728 |
mustComeBefore := mustComeBefore or:[eachClassInB isSubclassOf:a] |
|
729 |
]. |
|
730 |
mustComeBefore |
|
731 |
]. |
|
732 |
||
733 |
^ String streamContents:[:s | |
|
9606 | 734 |
|putLineForClass sysDepOrNil| |
735 |
||
736 |
putLineForClass := |
|
737 |
[:eachClass | |
|
738 |
|mappings newObjectLine| |
|
739 |
mappings := self objectLine_make_dot_spec_mappings: eachClass name. |
|
740 |
newObjectLine := self replaceMappings: mappings in: self objectLine_make_dot_spec. |
|
741 |
s nextPutLine:newObjectLine. |
|
742 |
]. |
|
9504 | 743 |
|
9606 | 744 |
sysDepOrNil := nil. |
745 |
#( |
|
746 |
('UNIX' #unix) |
|
747 |
('WIN32' #win32) |
|
748 |
('VMS' #vms) |
|
749 |
('BEOS' #beos) |
|
750 |
) pairsDo:[:def :id| |
|
751 |
|depClasses| |
|
752 |
||
753 |
depClasses := self compiled_classesForArchitecture:id. |
|
754 |
depClasses notEmpty ifTrue:[ |
|
755 |
sysDepOrNil := def,'_OBJS'. |
|
756 |
s nextPutLine:sysDepOrNil,'= \'. |
|
757 |
depClasses do:putLineForClass. |
|
758 |
s cr. |
|
759 |
s cr. |
|
760 |
] |
|
9534 | 761 |
]. |
9606 | 762 |
|
763 |
s nextPutLine:'COMMON_OBJS= \'. |
|
764 |
||
765 |
classes do:putLineForClass. |
|
9534 | 766 |
self extensionMethodNames notEmpty |
767 |
ifTrue:[ |
|
768 |
s nextPutLine:' extensions.$(O) \'. |
|
9606 | 769 |
]. |
770 |
s cr. |
|
9493 | 771 |
] |
772 |
||
9606 | 773 |
" |
774 |
bosch_dapasx_hw_schnittstellen_Definition generateObjects_make_dot_spec |
|
775 |
DapasXProject generateObjects_make_dot_spec |
|
776 |
stx_libbasic3 generateObjects_make_dot_spec |
|
777 |
" |
|
9493 | 778 |
|
779 |
"Created: / 09-08-2006 / 11:24:39 / fm" |
|
780 |
! |
|
781 |
||
9576 | 782 |
generateSubDirectories |
783 |
^ String streamContents:[:s | |
|
784 |
self subProjects |
|
785 |
do:[:subProjectName | |
|
786 |
s space; nextPutAll:subProjectName |
|
787 |
] |
|
9493 | 788 |
] |
789 |
||
9576 | 790 |
" |
791 |
DapasXProject generateSubDirectories |
|
792 |
DapasX_Datenbasis generateSubDirectories |
|
793 |
" |
|
9493 | 794 |
|
795 |
"Created: / 09-08-2006 / 11:26:59 / fm" |
|
9576 | 796 |
"Modified: / 18-08-2006 / 11:59:32 / cg" |
9493 | 797 |
! |
798 |
||
9503 | 799 |
generateUnixLocalIncludes |
9576 | 800 |
^ String streamContents:[:s | |
801 |
self searchForProjectsWhichProvideHeaderFiles |
|
802 |
do:[:includeProjectName | |
|
803 |
s nextPutAll:' -I',(self unixPathToPackage: includeProjectName) |
|
804 |
] |
|
9503 | 805 |
] |
806 |
||
9576 | 807 |
" |
808 |
DapasXProject generateLocalIncludes |
|
809 |
DapasX_Datenbasis generateLocalIncludes |
|
810 |
" |
|
9503 | 811 |
|
812 |
"Created: / 09-08-2006 / 16:46:49 / fm" |
|
9576 | 813 |
"Modified: / 18-08-2006 / 11:58:45 / cg" |
9594 | 814 |
! |
815 |
||
816 |
headerFileOutputArg |
|
817 |
"all stx stuff goes to the common include directory. |
|
818 |
Everything else is left locally" |
|
819 |
||
820 |
( |
|
821 |
#( |
|
822 |
'stx:libbasic' 'stx:libview' 'stx:libtool' |
|
823 |
'stx:libbasic2' 'stx:libview2' 'stx:libtool2' |
|
824 |
'stx:libbasic3' 'stx:libwidg' 'stx:libhtml' |
|
825 |
'stx:libcomp' 'stx:libwidg2' 'stx:libui' |
|
9596 | 826 |
'stx:libboss' 'stx:libdb' |
9594 | 827 |
) |
828 |
includes:self package) ifTrue:[ |
|
829 |
^ '-H$(INCLUDE)' |
|
830 |
]. |
|
831 |
^ '-H.' |
|
832 |
||
833 |
"Created: / 18-08-2006 / 13:01:52 / cg" |
|
9493 | 834 |
! ! |
835 |
||
9568 | 836 |
!LibraryDefinition class methodsFor:'sanity checks'! |
9493 | 837 |
|
838 |
searchForInconsistencies |
|
839 |
self searchForNeverCompiledSuperclasses. |
|
840 |
||
841 |
" |
|
842 |
self searchForInconsistencies |
|
843 |
DapasX_Datenbasis searchForInconsistencies |
|
844 |
" |
|
845 |
||
846 |
"Created: / 09-08-2006 / 16:30:46 / fm" |
|
847 |
! |
|
848 |
||
849 |
searchForNeverCompiledSuperclasses |
|
9495 | 850 |
self compiled_classesDo:[:includedClass | |
9493 | 851 |
includedClass allSuperclassesDo:[:eachSuperClass | |
852 |
eachSuperClass package == Project noProjectID ifTrue:[ |
|
853 |
self inconsistency:'uncompiled superclass: ' , eachSuperClass name |
|
854 |
]. |
|
855 |
] |
|
856 |
]. |
|
857 |
||
858 |
" |
|
859 |
self searchForNeverCompiledSuperclasses |
|
860 |
DapasX_Datenbasis searchForNeverCompiledSuperclasses |
|
861 |
" |
|
862 |
||
863 |
"Created: / 09-08-2006 / 16:31:54 / fm" |
|
864 |
! ! |
|
865 |
||
9568 | 866 |
!LibraryDefinition class methodsFor:'testing'! |
9558 | 867 |
|
868 |
isProjectDefinition |
|
9611 | 869 |
^ self ~~ LibraryDefinition |
9558 | 870 |
|
9612 | 871 |
" |
872 |
stx_libboss isProjectDefinition |
|
873 |
ProjectDefinition isProjectDefinition |
|
874 |
" |
|
875 |
||
9558 | 876 |
"Created: / 17-08-2006 / 14:11:46 / cg" |
9612 | 877 |
"Modified: / 21-08-2006 / 15:50:13 / cg" |
9558 | 878 |
! ! |
879 |
||
9568 | 880 |
!LibraryDefinition class methodsFor:'update description'! |
9493 | 881 |
|
9606 | 882 |
classNamesAndAttributes_code |
9495 | 883 |
^ String streamContents:[:s | |
9606 | 884 |
s nextPutLine:'classNamesAndAttributes'. |
9576 | 885 |
s nextPutLine:' ^ #('. |
9606 | 886 |
s tab; nextPutLine:'"/ <className> or (<className> attributes...)'. |
9576 | 887 |
self searchForClasses do:[:eachClass | |
9606 | 888 |
|attributes specEntry| |
889 |
||
9616 | 890 |
(eachClass isLoaded not or:[eachClass isPrivate not]) ifTrue:[ |
9606 | 891 |
specEntry := self classNamesAndAttributes detect:[:entry | entry first = eachClass name] ifNone:nil. |
9617 | 892 |
specEntry isNil ifTrue:[ |
893 |
eachClass isLoaded ifFalse:[ |
|
894 |
attributes := #( autoload ). |
|
895 |
]. |
|
896 |
] ifFalse:[ |
|
9606 | 897 |
attributes := specEntry copyFrom:2. |
898 |
]. |
|
899 |
||
900 |
s tab. |
|
901 |
attributes isEmptyOrNil ifTrue:[ |
|
902 |
s nextPutAll:eachClass name asString storeString. |
|
903 |
] ifFalse:[ |
|
904 |
s nextPutAll:'('; nextPutAll:eachClass name asString storeString. |
|
905 |
s nextPutAll:' '. |
|
906 |
attributes do:[:eachAttribute | s nextPutAll:eachAttribute storeString.]. |
|
907 |
s nextPutAll:')'. |
|
908 |
]. |
|
909 |
s cr. |
|
9495 | 910 |
] |
911 |
]. |
|
9606 | 912 |
s nextPutLine:' )' |
9495 | 913 |
]. |
9493 | 914 |
|
915 |
" |
|
9606 | 916 |
stx_libbasic3 classNamesAndAttributes_code |
9493 | 917 |
" |
918 |
||
919 |
"Modified: / 08-08-2006 / 19:24:34 / fm" |
|
9576 | 920 |
"Created: / 17-08-2006 / 21:03:07 / cg" |
9617 | 921 |
"Modified: / 21-08-2006 / 19:16:14 / cg" |
9493 | 922 |
! |
923 |
||
9576 | 924 |
extensionMethodNames_code |
925 |
^ String streamContents:[:s | |
|
926 |
s nextPutLine:'extensionMethodNames'. |
|
927 |
s nextPutLine:' ^ #('. |
|
928 |
self searchForExtensions do:[:eachMethod | |
|
929 |
s nextPutAll:eachMethod mclass name storeString. |
|
930 |
s nextPutAll:' '. |
|
931 |
s nextPutLine: eachMethod selector storeString. |
|
932 |
]. |
|
9606 | 933 |
s nextPutLine:' )' |
9576 | 934 |
]. |
9493 | 935 |
|
936 |
" |
|
9576 | 937 |
self extensionMethodNames_code |
9493 | 938 |
" |
939 |
||
9576 | 940 |
"Created: / 17-08-2006 / 21:21:48 / cg" |
9493 | 941 |
! |
942 |
||
9514 | 943 |
forEachMethodsCodeToCompileDo:aTwoArgBlock |
9586 | 944 |
super forEachMethodsCodeToCompileDo:aTwoArgBlock. |
945 |
||
9514 | 946 |
aTwoArgBlock |
9606 | 947 |
value:self classNamesAndAttributes_code |
9534 | 948 |
value:'description'. |
9514 | 949 |
|
9586 | 950 |
aTwoArgBlock |
9576 | 951 |
value: self extensionMethodNames_code |
9534 | 952 |
value: 'description'. |
9514 | 953 |
|
954 |
"Created: / 10-08-2006 / 16:35:47 / cg" |
|
9586 | 955 |
"Modified: / 18-08-2006 / 16:22:49 / cg" |
9493 | 956 |
! ! |
957 |
||
9568 | 958 |
!LibraryDefinition class methodsFor:'documentation'! |
9493 | 959 |
|
960 |
version |
|
9617 | 961 |
^ '$Header: /cvs/stx/stx/libbasic/LibraryDefinition.st,v 1.37 2006-08-21 17:16:16 cg Exp $' |
9493 | 962 |
! ! |