LibraryDefinition.st
author Claus Gittinger <cg@exept.de>
Fri, 15 Sep 2006 19:34:16 +0200
changeset 9907 8f907d537b9c
parent 9902 74fab44fab6e
child 9957 addab182ac85
permissions -rw-r--r--
hasExtensions is a bad name (conflicts with the other query)
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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
9671
cb20763db715 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9666
diff changeset
    13
"{ Package: 'stx:libbasic' }"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
    14
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
    15
ProjectDefinition subclass:#LibraryDefinition
9616
7bd19460f53f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9613
diff changeset
    16
	instanceVariableNames:''
7bd19460f53f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9613
diff changeset
    17
	classVariableNames:''
7bd19460f53f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9613
diff changeset
    18
	poolDictionaries:''
7bd19460f53f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9613
diff changeset
    19
	category:'System-Support-Projects'
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
    20
!
b17358de5730 initial checkin
fm
parents:
diff changeset
    21
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
    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
b17358de5730 initial checkin
fm
parents:
diff changeset
    37
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
    38
!LibraryDefinition class methodsFor:'defaults'!
9533
fae577b43add *** empty log message ***
fm
parents: 9530
diff changeset
    39
9534
b326ffacb811 *** empty log message ***
fm
parents: 9533
diff changeset
    40
defaultDescription
b326ffacb811 *** empty log message ***
fm
parents: 9533
diff changeset
    41
    ^ 'a classLibrary'
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
    42
! !
b17358de5730 initial checkin
fm
parents:
diff changeset
    43
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    44
!LibraryDefinition class methodsFor:'description - project information'!
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    45
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    46
description
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    47
    "Returns a description string which will appear in nt.def / bc.def"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    48
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    49
    self module = 'stx' ifTrue:[
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    50
        ^ 'Smalltalk/X Class library'
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    51
    ].
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    52
9586
eb87399baea3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9582
diff changeset
    53
    ^ 'Class Library'
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    54
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    55
    "Created: / 17-08-2006 / 20:52:16 / cg"
9586
eb87399baea3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9582
diff changeset
    56
    "Modified: / 18-08-2006 / 16:15:53 / cg"
9847
102c149868ad *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9832
diff changeset
    57
!
102c149868ad *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9832
diff changeset
    58
102c149868ad *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9832
diff changeset
    59
fileDescription
102c149868ad *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9832
diff changeset
    60
    "Return a description string which will appear in nt.def / bc.def"
102c149868ad *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9832
diff changeset
    61
102c149868ad *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9832
diff changeset
    62
    ^self description , ' ClassLibrary'
102c149868ad *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9832
diff changeset
    63
102c149868ad *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9832
diff changeset
    64
    "Created: / 14-09-2006 / 10:55:23 / cg"
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    65
! !
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    66
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
    67
!LibraryDefinition class methodsFor:'file generation'!
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
    68
9853
1ccdc89f1b4f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9851
diff changeset
    69
basicFileNamesToGenerate
9534
b326ffacb811 *** empty log message ***
fm
parents: 9533
diff changeset
    70
    ^ #( 
9604
55b93e1619f8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9596
diff changeset
    71
          #('Make.proto'        #'generate_make_dot_proto')
55b93e1619f8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9596
diff changeset
    72
          #('Make.spec'         #'generate_make_dot_spec')
55b93e1619f8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9596
diff changeset
    73
          #('libInit.cc'        #'generate_libInit_dot_cc')
55b93e1619f8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9596
diff changeset
    74
          #('bc.def'            #'generate_bc_dot_def')
55b93e1619f8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9596
diff changeset
    75
          #('nt.mak'            #'generate_nt_dot_mak')
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    76
"
9604
55b93e1619f8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9596
diff changeset
    77
          #('nt.def'            #'generate_nt_dot_def')
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    78
"
9604
55b93e1619f8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9596
diff changeset
    79
          #('abbrev.stc'        #'generate_abbrev_dot_stc') 
55b93e1619f8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9596
diff changeset
    80
          #('bmake.bat'         #'generate_bmake_dot_mak') 
9899
1c1ed66c7163 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9885
diff changeset
    81
     ) , (Array
1c1ed66c7163 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9885
diff changeset
    82
            with:
1c1ed66c7163 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9885
diff changeset
    83
                (Array 
1c1ed66c7163 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9885
diff changeset
    84
                    with:self rcFilename
1c1ed66c7163 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9885
diff changeset
    85
                    with:#'generate_packageName_dot_rc')
1c1ed66c7163 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9885
diff changeset
    86
         ).
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
    87
9853
1ccdc89f1b4f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9851
diff changeset
    88
    "Created: / 14-09-2006 / 14:36:14 / cg"
9899
1c1ed66c7163 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9885
diff changeset
    89
    "Modified: / 14-09-2006 / 21:02:08 / cg"
9582
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
    90
!
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
    91
9622
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
    92
generateFile:filename
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
    93
    filename = 'libInit.cc' ifTrue:[
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
    94
        ^ self generate_libInit_dot_cc
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
    95
    ].
9832
8ab508c6d9f0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9818
diff changeset
    96
    ((filename = 'lib.rc') or:[filename = self rcFilename]) ifTrue:[
9622
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
    97
        ^ self generate_packageName_dot_rc
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
    98
    ].
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
    99
    ^ super generateFile:filename
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
   100
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
   101
    "Created: / 22-08-2006 / 18:36:24 / cg"
9832
8ab508c6d9f0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9818
diff changeset
   102
    "Modified: / 07-09-2006 / 17:07:46 / cg"
9622
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
   103
!
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
   104
9582
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   105
generate_libInit_dot_cc
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   106
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   107
    ^self replaceMappings: self libInit_dot_cc_mappings 
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   108
            in: self libInit_dot_cc
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   109
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   110
"
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   111
  DapasXProject generate_libInit_dot_cc
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   112
  DapasX_Datenbasis generate_libInit_dot_cc
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   113
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   114
"
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   115
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   116
    "Created: / 08-08-2006 / 12:47:16 / fm"
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   117
    "Modified: / 09-08-2006 / 11:30:52 / fm"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   118
! !
b17358de5730 initial checkin
fm
parents:
diff changeset
   119
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
   120
!LibraryDefinition class methodsFor:'file templates'!
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   121
b17358de5730 initial checkin
fm
parents:
diff changeset
   122
bc_dot_def
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   123
    "the template code for the bc.def file"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   124
b17358de5730 initial checkin
fm
parents:
diff changeset
   125
^ 
9608
9dbec800d20e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9606
diff changeset
   126
'LIBRARY         %(LIBRARY_NAME)
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   127
DESCRIPTION     %(DESCRIPTION)
b17358de5730 initial checkin
fm
parents:
diff changeset
   128
CODE            PRELOAD MOVEABLE DISCARDABLE
b17358de5730 initial checkin
fm
parents:
diff changeset
   129
SEGMENTS
b17358de5730 initial checkin
fm
parents:
diff changeset
   130
    INITCODE    PRELOAD DISCARDABLE
b17358de5730 initial checkin
fm
parents:
diff changeset
   131
EXPORTS
9590
4b6cfa035ecb *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9586
diff changeset
   132
    __%(LIBRARY_NAME)_Init     @1
9504
b89c84c60e86 *** empty log message ***
fm
parents: 9503
diff changeset
   133
'
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   134
b17358de5730 initial checkin
fm
parents:
diff changeset
   135
    "Created: / 08-08-2006 / 12:26:58 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   136
    "Modified: / 08-08-2006 / 19:32:27 / fm"
9590
4b6cfa035ecb *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9586
diff changeset
   137
    "Modified: / 18-08-2006 / 17:13:45 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   138
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   139
b17358de5730 initial checkin
fm
parents:
diff changeset
   140
classLine_libInit_dot_cc
b17358de5730 initial checkin
fm
parents:
diff changeset
   141
b17358de5730 initial checkin
fm
parents:
diff changeset
   142
^'_%(CLASS)_Init(pass,__pRT__,snd);'
b17358de5730 initial checkin
fm
parents:
diff changeset
   143
b17358de5730 initial checkin
fm
parents:
diff changeset
   144
    "Created: / 08-08-2006 / 12:51:44 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   145
    "Modified: / 08-08-2006 / 15:46:05 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   146
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   147
b17358de5730 initial checkin
fm
parents:
diff changeset
   148
extensionLine_libInit_dot_cc
b17358de5730 initial checkin
fm
parents:
diff changeset
   149
b17358de5730 initial checkin
fm
parents:
diff changeset
   150
^'_%(LIBRARY_NAME)_extensions_Init(pass,__pRT__,snd);'
b17358de5730 initial checkin
fm
parents:
diff changeset
   151
b17358de5730 initial checkin
fm
parents:
diff changeset
   152
    "Created: / 08-08-2006 / 15:48:56 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   153
    "Modified: / 08-08-2006 / 19:32:33 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   154
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   155
b17358de5730 initial checkin
fm
parents:
diff changeset
   156
libInit_dot_cc
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   157
    "the template code for the libInit.cc file"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   158
b17358de5730 initial checkin
fm
parents:
diff changeset
   159
^ 
b17358de5730 initial checkin
fm
parents:
diff changeset
   160
'/*
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   161
 * $','Header','$
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   162
 *
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   163
 * DO NOT EDIT 
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   164
 * automagically generated from the projectDefinition: ',self name,'.
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   165
 */
b17358de5730 initial checkin
fm
parents:
diff changeset
   166
#define __INDIRECTVMINITCALLS__
b17358de5730 initial checkin
fm
parents:
diff changeset
   167
#include <stc.h>
b17358de5730 initial checkin
fm
parents:
diff changeset
   168
#define INIT_TEXT_SECT /* as nothing */
b17358de5730 initial checkin
fm
parents:
diff changeset
   169
#ifdef WIN32
b17358de5730 initial checkin
fm
parents:
diff changeset
   170
# pragma codeseg INITCODE "INITCODE"
b17358de5730 initial checkin
fm
parents:
diff changeset
   171
#else /* not WIN32 */
b17358de5730 initial checkin
fm
parents:
diff changeset
   172
# if defined(__GNUC__) && !!defined(NO_SECTION_ATTRIBUTES)
b17358de5730 initial checkin
fm
parents:
diff changeset
   173
#  if (__GNUC__  == 2 && __GNUC_MINOR__ >= 7) || __GNUC__ > 2
b17358de5730 initial checkin
fm
parents:
diff changeset
   174
#   undef INIT_TEXT_SECT
b17358de5730 initial checkin
fm
parents:
diff changeset
   175
#   define INIT_TEXT_SECT __attribute__((section(".stxitext")))
b17358de5730 initial checkin
fm
parents:
diff changeset
   176
#  endif
b17358de5730 initial checkin
fm
parents:
diff changeset
   177
# endif /* not GNUC */
b17358de5730 initial checkin
fm
parents:
diff changeset
   178
#endif /* not WIN32 */
b17358de5730 initial checkin
fm
parents:
diff changeset
   179
#ifdef INIT_TEXT_SECT
b17358de5730 initial checkin
fm
parents:
diff changeset
   180
extern void _%(LIBRARY_NAME)_Init() INIT_TEXT_SECT;
b17358de5730 initial checkin
fm
parents:
diff changeset
   181
#endif
b17358de5730 initial checkin
fm
parents:
diff changeset
   182
void _%(LIBRARY_NAME)_Init(pass, __pRT__, snd)
b17358de5730 initial checkin
fm
parents:
diff changeset
   183
OBJ snd; struct __vmData__ *__pRT__; {
b17358de5730 initial checkin
fm
parents:
diff changeset
   184
__BEGIN_PACKAGE2__("%(LIBRARY_NAME)", _%(LIBRARY_NAME)_Init, "%(PACKAGE)");
b17358de5730 initial checkin
fm
parents:
diff changeset
   185
%(CLASSES)
b17358de5730 initial checkin
fm
parents:
diff changeset
   186
%(EXTENSION)
b17358de5730 initial checkin
fm
parents:
diff changeset
   187
__END_PACKAGE__();
9902
74fab44fab6e Add newline at end of libInit.cc
Stefan Vogel <sv@exept.de>
parents: 9899
diff changeset
   188
}
74fab44fab6e Add newline at end of libInit.cc
Stefan Vogel <sv@exept.de>
parents: 9899
diff changeset
   189
'
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   190
b17358de5730 initial checkin
fm
parents:
diff changeset
   191
    "Created: / 08-08-2006 / 12:40:45 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   192
    "Modified: / 08-08-2006 / 19:33:01 / fm"
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   193
    "Modified: / 18-08-2006 / 12:57:02 / cg"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   194
!
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   195
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   196
lib_dot_rc
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   197
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   198
^ 
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   199
'/*------------------------------------------------------------------------
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   200
 * $','Header','$                                                            
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   201
 *
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   202
 * DO NOT EDIT 
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   203
 * automagically generated from the projectDefinition: ',self name,'.
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   204
 *------------------------------------------------------------------------*/
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   205
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   206
// #if (__BORLANDC__ < 0x0550)
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   207
// #include <ver.h>
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   208
// #endif
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   209
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   210
VS_VERSION_INFO VERSIONINFO
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   211
  FILEVERSION     %(FILEVERSION)
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   212
  PRODUCTVERSION  %(PRODUCTVERSION)
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   213
  FILEFLAGSMASK   VS_FF_DEBUG | VS_FF_PRERELEASE
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   214
  FILEFLAGS       VS_FF_PRERELEASE | VS_FF_SPECIALBUILD
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   215
  FILEOS          VOS_NT_WINDOWS32
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   216
  FILETYPE        %(FILETYPE)
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   217
  FILESUBTYPE     VS_USER_DEFINED
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   218
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   219
BEGIN
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   220
  BLOCK "StringFileInfo"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   221
  BEGIN
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   222
    BLOCK "040904E4"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   223
    BEGIN
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   224
      VALUE "CompanyName", %(COMPANYNAME)
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   225
      VALUE "FileDescription", "Smalltalk/X Additional Developer Basic Classes Library\0"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   226
      VALUE "FileVersion", "5.2.8.1\0"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   227
      VALUE "InternalName", "libbasic3\0"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   228
      VALUE "LegalCopyright", "Copyright eXept Software AG 1998-2006\0"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   229
      VALUE "ProductName", "Smalltalk/X\0"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   230
      VALUE "ProductVersion", "5.2.8.1\0"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   231
    END
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   232
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   233
  END
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   234
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   235
  BLOCK "VarFileInfo"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   236
  BEGIN                               //  Language   |    Translation
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   237
    VALUE "Translation", 0x409, 0x4E4 // U.S. English, Windows Multilingual
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   238
  END
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   239
END
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   240
'
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   241
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   242
    "Created: / 17-08-2006 / 19:37:50 / cg"
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   243
    "Modified: / 18-08-2006 / 12:57:09 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   244
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   245
b17358de5730 initial checkin
fm
parents:
diff changeset
   246
make_dot_proto
b17358de5730 initial checkin
fm
parents:
diff changeset
   247
b17358de5730 initial checkin
fm
parents:
diff changeset
   248
^ 
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   249
'# $','Header','$
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   250
#
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   251
# DO NOT EDIT 
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   252
# automagically generated from the projectDefinition: ',self name,'.
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   253
#
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   254
# Warning: once you modify this file, do not rerun
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   255
# stmkmp or projectDefinition-build again - otherwise, your changes are lost.
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   256
#
b17358de5730 initial checkin
fm
parents:
diff changeset
   257
# The Makefile as generated by this Make.proto supports the following targets:
b17358de5730 initial checkin
fm
parents:
diff changeset
   258
#    make         - compile all st-files to a classLib
b17358de5730 initial checkin
fm
parents:
diff changeset
   259
#    make clean   - clean all temp files
b17358de5730 initial checkin
fm
parents:
diff changeset
   260
#    make clobber - clean all
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   261
#
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   262
# This file contains definitions for Unix based platforms.
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   263
# It shares common definitions with the win32-make in Make.spec.
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   264
b17358de5730 initial checkin
fm
parents:
diff changeset
   265
#
b17358de5730 initial checkin
fm
parents:
diff changeset
   266
# position (of this package) in directory hierarchy:
b17358de5730 initial checkin
fm
parents:
diff changeset
   267
# (must point to ST/X top directory, for tools and includes)
b17358de5730 initial checkin
fm
parents:
diff changeset
   268
TOP=%(TOP)
9879
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   269
INCLUDE_TOP=$(TOP)/..
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   270
b17358de5730 initial checkin
fm
parents:
diff changeset
   271
# subdirectories where targets are to be made:
b17358de5730 initial checkin
fm
parents:
diff changeset
   272
SUBDIRS=%(SUBDIRECTORIES)
b17358de5730 initial checkin
fm
parents:
diff changeset
   273
b17358de5730 initial checkin
fm
parents:
diff changeset
   274
b17358de5730 initial checkin
fm
parents:
diff changeset
   275
# subdirectories where Makefiles are to be made:
b17358de5730 initial checkin
fm
parents:
diff changeset
   276
# (only define if different from SUBDIRS)
b17358de5730 initial checkin
fm
parents:
diff changeset
   277
# ALLSUBDIRS=
b17358de5730 initial checkin
fm
parents:
diff changeset
   278
b17358de5730 initial checkin
fm
parents:
diff changeset
   279
b17358de5730 initial checkin
fm
parents:
diff changeset
   280
# if your embedded C code requires any system includes, 
b17358de5730 initial checkin
fm
parents:
diff changeset
   281
# add the path(es) here:, 
b17358de5730 initial checkin
fm
parents:
diff changeset
   282
# ********** OPTIONAL: MODIFY the next lines ***
b17358de5730 initial checkin
fm
parents:
diff changeset
   283
# LOCALINCLUDES=-Ifoo -Ibar
b17358de5730 initial checkin
fm
parents:
diff changeset
   284
LOCALINCLUDES=%(LOCAL_INCLUDES)
b17358de5730 initial checkin
fm
parents:
diff changeset
   285
b17358de5730 initial checkin
fm
parents:
diff changeset
   286
b17358de5730 initial checkin
fm
parents:
diff changeset
   287
# if you need any additional defines for embedded C code, 
b17358de5730 initial checkin
fm
parents:
diff changeset
   288
# add them here:, 
b17358de5730 initial checkin
fm
parents:
diff changeset
   289
# ********** OPTIONAL: MODIFY the next lines ***
b17358de5730 initial checkin
fm
parents:
diff changeset
   290
# LOCALDEFINES=-Dfoo -Dbar -DDEBUG
b17358de5730 initial checkin
fm
parents:
diff changeset
   291
LOCALDEFINES=%(LOCAL_DEFINES)
b17358de5730 initial checkin
fm
parents:
diff changeset
   292
9818
34d323af35ba *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9812
diff changeset
   293
LIBNAME=%(LIBRARY_NAME)
9613
b61c0a447008 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9612
diff changeset
   294
STCLOCALOPT=''-package=$(PACKAGE)'' -I. $(LOCALINCLUDES) $(STCLOCALOPTIMIZATIONS) $(STCWARNINGS) $(LOCALDEFINES) %(HEADEROUTPUTARG) %(COMMONSYMFLAG) -varPrefix=$(LIBNAME)
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   295
b17358de5730 initial checkin
fm
parents:
diff changeset
   296
b17358de5730 initial checkin
fm
parents:
diff changeset
   297
# ********** OPTIONAL: MODIFY the next line ***
b17358de5730 initial checkin
fm
parents:
diff changeset
   298
# additional C-libraries that should be pre-linked with the class-objects
9734
cbd8cfd24c3a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9723
diff changeset
   299
LD_OBJ_LIBS=%(ADDITIONAL_LINK_LIBRARIES)
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   300
b17358de5730 initial checkin
fm
parents:
diff changeset
   301
b17358de5730 initial checkin
fm
parents:
diff changeset
   302
# ********** OPTIONAL: MODIFY the next line ***
b17358de5730 initial checkin
fm
parents:
diff changeset
   303
# additional C targets or libraries should be added below
b17358de5730 initial checkin
fm
parents:
diff changeset
   304
LOCAL_EXTRA_TARGETS=
b17358de5730 initial checkin
fm
parents:
diff changeset
   305
9606
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   306
OBJS= $(COMMON_OBJS) $(UNIX_OBJS)
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   307
9626
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   308
%(ADDITIONAL_DEFINITIONS)
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   309
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   310
all:: preMake classLibRule postMake
b17358de5730 initial checkin
fm
parents:
diff changeset
   311
9626
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   312
pre_objs:: %(ADDITIONAL_TARGETS)
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   313
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   314
%(ADDITIONAL_RULES)
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   315
b17358de5730 initial checkin
fm
parents:
diff changeset
   316
# add more install actions here
b17358de5730 initial checkin
fm
parents:
diff changeset
   317
install::
b17358de5730 initial checkin
fm
parents:
diff changeset
   318
b17358de5730 initial checkin
fm
parents:
diff changeset
   319
# add more install actions for aux-files (resources) here
b17358de5730 initial checkin
fm
parents:
diff changeset
   320
installAux::
b17358de5730 initial checkin
fm
parents:
diff changeset
   321
b17358de5730 initial checkin
fm
parents:
diff changeset
   322
# add more preMake actions here
b17358de5730 initial checkin
fm
parents:
diff changeset
   323
preMake::
b17358de5730 initial checkin
fm
parents:
diff changeset
   324
b17358de5730 initial checkin
fm
parents:
diff changeset
   325
# add more postMake actions here
b17358de5730 initial checkin
fm
parents:
diff changeset
   326
postMake:: cleanjunk
b17358de5730 initial checkin
fm
parents:
diff changeset
   327
b17358de5730 initial checkin
fm
parents:
diff changeset
   328
cleanjunk::
b17358de5730 initial checkin
fm
parents:
diff changeset
   329
b17358de5730 initial checkin
fm
parents:
diff changeset
   330
clean::
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   331
%(TAB)-rm -f *.o *.H
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   332
b17358de5730 initial checkin
fm
parents:
diff changeset
   333
clobber::
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   334
%(TAB)-rm -f *.so *.dll
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   335
b17358de5730 initial checkin
fm
parents:
diff changeset
   336
',
b17358de5730 initial checkin
fm
parents:
diff changeset
   337
"
b17358de5730 initial checkin
fm
parents:
diff changeset
   338
$(INSTALLBASE)::
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   339
%(TAB)@test -d $@ || mkdir $@
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   340
b17358de5730 initial checkin
fm
parents:
diff changeset
   341
$(INSTALLBASE)/packages:: $(INSTALLBASE)
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   342
%(TAB)@test -d $@ || mkdir $@
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   343
b17358de5730 initial checkin
fm
parents:
diff changeset
   344
$(INSTALLBASE)/packages/$(MODULE):: $(INSTALLBASE)/packages
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   345
%(TAB)@test -d $@ || mkdir $@
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   346
b17358de5730 initial checkin
fm
parents:
diff changeset
   347
$(INSTALLBASE)/packages/$(MODULE)/dapasx:: $(INSTALLBASE)/packages/$(MODULE)
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   348
%(TAB)@test -d $@ || mkdir $@
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   349
b17358de5730 initial checkin
fm
parents:
diff changeset
   350
$(INSTALLBASE)/packages/$(MODULE)/dapasx/interactiver_editor:: $(INSTALLBASE)/packages/$(MODULE)/dapasx
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   351
%(TAB)@test -d $@ || mkdir $@
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   352
b17358de5730 initial checkin
fm
parents:
diff changeset
   353
$(INSTALLBASE)/packages/$(MODULE)/$(MODULE_DIR):: $(INSTALLBASE)/packages/$(MODULE)
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   354
%(TAB)@test -d $@ || mkdir $@
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   355
"
b17358de5730 initial checkin
fm
parents:
diff changeset
   356
'
b17358de5730 initial checkin
fm
parents:
diff changeset
   357
# BEGINMAKEDEPEND --- do not remove this line; make depend needs it
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   358
%(DEPENDENCIES)
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   359
# ENDMAKEDEPEND --- do not remove this line
b17358de5730 initial checkin
fm
parents:
diff changeset
   360
b17358de5730 initial checkin
fm
parents:
diff changeset
   361
'
b17358de5730 initial checkin
fm
parents:
diff changeset
   362
b17358de5730 initial checkin
fm
parents:
diff changeset
   363
    "Created: / 08-08-2006 / 20:45:36 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   364
    "Modified: / 09-08-2006 / 16:50:23 / fm"
9879
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   365
    "Modified: / 14-09-2006 / 15:48:02 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   366
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   367
b17358de5730 initial checkin
fm
parents:
diff changeset
   368
nt_dot_def
b17358de5730 initial checkin
fm
parents:
diff changeset
   369
b17358de5730 initial checkin
fm
parents:
diff changeset
   370
^
b17358de5730 initial checkin
fm
parents:
diff changeset
   371
'LIBRARY        %(LIBRARY_NAME)
b17358de5730 initial checkin
fm
parents:
diff changeset
   372
DESCRIPTION     %(DESCRIPTION)
b17358de5730 initial checkin
fm
parents:
diff changeset
   373
VERSION         %(VERSION_NUMBER)
b17358de5730 initial checkin
fm
parents:
diff changeset
   374
CODE            EXECUTE READ 
b17358de5730 initial checkin
fm
parents:
diff changeset
   375
DATA            READ WRITE
b17358de5730 initial checkin
fm
parents:
diff changeset
   376
SECTIONS
b17358de5730 initial checkin
fm
parents:
diff changeset
   377
    INITCODE    READ EXECUTE 
b17358de5730 initial checkin
fm
parents:
diff changeset
   378
    INITDATA    READ WRITE
b17358de5730 initial checkin
fm
parents:
diff changeset
   379
EXPORTS 
b17358de5730 initial checkin
fm
parents:
diff changeset
   380
    _%(LIBRARY_NAME)_Init      @1
b17358de5730 initial checkin
fm
parents:
diff changeset
   381
IMPORTS'
b17358de5730 initial checkin
fm
parents:
diff changeset
   382
b17358de5730 initial checkin
fm
parents:
diff changeset
   383
    "Modified: / 08-08-2006 / 19:33:14 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   384
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   385
b17358de5730 initial checkin
fm
parents:
diff changeset
   386
nt_dot_mak
b17358de5730 initial checkin
fm
parents:
diff changeset
   387
b17358de5730 initial checkin
fm
parents:
diff changeset
   388
^
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   389
'# $','Header','$
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   390
#
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   391
# DO NOT EDIT 
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   392
# automagically generated from the projectDefinition: ',self name,'.
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   393
#
b17358de5730 initial checkin
fm
parents:
diff changeset
   394
# Warning: once you modify this file, do not rerun
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   395
# stmkmp or projectDefinition-build again - otherwise, your changes are lost.
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   396
#
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   397
# This file contains make rules for the win32 platform (using borland-bcc).
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   398
# It shares common definitions with the unix-make in Make.spec.
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   399
# The nt.mak supports the following targets:
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   400
#    bmake         - compile all st-files to a classLib (dll)
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   401
#    bmake clean   - clean all temp files
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   402
#    bmake clobber - clean all
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   403
#
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   404
#
b17358de5730 initial checkin
fm
parents:
diff changeset
   405
TOP=%(TOP)
9879
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   406
INCLUDE_TOP=$(TOP)\..
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   407
b17358de5730 initial checkin
fm
parents:
diff changeset
   408
!!INCLUDE $(TOP)\rules\stdHeader_nt
b17358de5730 initial checkin
fm
parents:
diff changeset
   409
b17358de5730 initial checkin
fm
parents:
diff changeset
   410
!!INCLUDE Make.spec
b17358de5730 initial checkin
fm
parents:
diff changeset
   411
9818
34d323af35ba *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9812
diff changeset
   412
LIBNAME=%(LIBRARY_NAME)
34d323af35ba *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9812
diff changeset
   413
RESFILES=%(RESFILENAME)
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   414
LOCALINCLUDES=%(LOCAL_INCLUDES)
b17358de5730 initial checkin
fm
parents:
diff changeset
   415
9631
e75ce0862247 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9629
diff changeset
   416
STCLOCALOPT=-package=$(PACKAGE) -I. $(LOCALINCLUDES) %(HEADEROUTPUTARG) $(STCLOCALOPTIMIZATIONS) $(STCWARNINGS) $(LOCALDEFINES) %(COMMONSYMFLAG) -varPrefix=$(LIBNAME)
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   417
9626
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   418
%(ADDITIONAL_DEFINITIONS)
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   419
9606
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   420
OBJS= $(COMMON_OBJS) $(WIN32_OBJS)
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   421
9626
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   422
ALL::  %(ADDITIONAL_TARGETS) $(LIBDIR)\$(LIBNAME).lib $(BINDIR)\$(LIBNAME).dll
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   423
b17358de5730 initial checkin
fm
parents:
diff changeset
   424
!!INCLUDE $(TOP)\rules\stdRules_nt
b17358de5730 initial checkin
fm
parents:
diff changeset
   425
9626
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   426
%(ADDITIONAL_RULES)
91e467416a76 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9622
diff changeset
   427
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   428
# BEGINMAKEDEPEND --- do not remove this line; make depend needs it
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   429
%(DEPENDENCIES)
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   430
# ENDMAKEDEPEND --- do not remove this line
b17358de5730 initial checkin
fm
parents:
diff changeset
   431
'
b17358de5730 initial checkin
fm
parents:
diff changeset
   432
b17358de5730 initial checkin
fm
parents:
diff changeset
   433
    "Created: / 09-08-2006 / 11:44:20 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   434
    "Modified: / 09-08-2006 / 19:59:32 / fm"
9879
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   435
    "Modified: / 14-09-2006 / 15:48:18 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   436
! !
b17358de5730 initial checkin
fm
parents:
diff changeset
   437
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
   438
!LibraryDefinition class methodsFor:'mappings'!
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   439
b17358de5730 initial checkin
fm
parents:
diff changeset
   440
bc_dot_def_mappings
9534
b326ffacb811 *** empty log message ***
fm
parents: 9533
diff changeset
   441
    ^ (super bc_dot_def_mappings)
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   442
        at:'LIBRARY_NAME' put:( self libraryName );
9504
b89c84c60e86 *** empty log message ***
fm
parents: 9503
diff changeset
   443
        yourself
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   444
b17358de5730 initial checkin
fm
parents:
diff changeset
   445
    "Created: / 09-08-2006 / 11:17:59 / fm"
9543
b4f82498926b *** empty log message ***
fm
parents: 9540
diff changeset
   446
    "Modified: / 16-08-2006 / 18:19:25 / User"
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   447
    "Modified: / 14-09-2006 / 18:56:11 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   448
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   449
b17358de5730 initial checkin
fm
parents:
diff changeset
   450
classLine_libInit_dot_cc_mappings: aClassName
b17358de5730 initial checkin
fm
parents:
diff changeset
   451
b17358de5730 initial checkin
fm
parents:
diff changeset
   452
^Dictionary new                                               
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   453
    at: 'CLASS' put: ( self st2c:aClassName );
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   454
    yourself
b17358de5730 initial checkin
fm
parents:
diff changeset
   455
b17358de5730 initial checkin
fm
parents:
diff changeset
   456
    "Created: / 08-08-2006 / 14:04:00 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   457
    "Modified: / 09-08-2006 / 18:27:07 / fm"
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   458
    "Modified: / 14-09-2006 / 18:56:18 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   459
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   460
b17358de5730 initial checkin
fm
parents:
diff changeset
   461
extensionLine_libInit_dot_cc_mappings
b17358de5730 initial checkin
fm
parents:
diff changeset
   462
b17358de5730 initial checkin
fm
parents:
diff changeset
   463
^Dictionary new                                               
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   464
    at: 'LIBRARY_NAME' put: ( self st2c:(self package copy asString replaceAny:':/' with:$_) );
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   465
    yourself
b17358de5730 initial checkin
fm
parents:
diff changeset
   466
b17358de5730 initial checkin
fm
parents:
diff changeset
   467
    "Created: / 09-08-2006 / 11:19:59 / fm"
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   468
    "Modified: / 14-09-2006 / 18:56:26 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   469
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   470
b17358de5730 initial checkin
fm
parents:
diff changeset
   471
libInit_dot_cc_mappings
b17358de5730 initial checkin
fm
parents:
diff changeset
   472
b17358de5730 initial checkin
fm
parents:
diff changeset
   473
^Dictionary new
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   474
    at: 'LIBRARY_NAME' put: (self libraryName);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   475
    at: 'PACKAGE' put: (self package);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   476
    at: 'CLASSES' put: (self generateClassLines_libInit_dot_cc);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   477
    at: 'EXTENSION' put: (self generateExtensionLine_libInit_dot_cc);
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   478
b17358de5730 initial checkin
fm
parents:
diff changeset
   479
    yourself
b17358de5730 initial checkin
fm
parents:
diff changeset
   480
b17358de5730 initial checkin
fm
parents:
diff changeset
   481
    "Created: / 09-08-2006 / 11:20:24 / fm"
9543
b4f82498926b *** empty log message ***
fm
parents: 9540
diff changeset
   482
    "Modified: / 16-08-2006 / 18:19:03 / User"
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   483
    "Modified: / 14-09-2006 / 18:56:42 / cg"
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   484
!
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   485
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   486
make_dot_proto_mappings
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   487
    ^ Dictionary new
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   488
        at: 'TAB' put: ( Character tab asString );
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   489
        at: 'TOP' put: ( self pathToTop_unix );
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   490
        at: 'LIBRARY_NAME' put: ( self libraryName );
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   491
        at: 'SUBDIRECTORIES' put: (self generateSubDirectories);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   492
        at: 'LOCAL_INCLUDES' put: (self generateLocalIncludes_unix);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   493
        at: 'LOCAL_DEFINES' put: '';
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   494
        at: 'COMMONSYMFLAG' put: (self commonSymbolsFlag);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   495
        at: 'HEADEROUTPUTARG' put: (self headerFileOutputArg);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   496
        at: 'ADDITIONAL_DEFINITIONS' put: (self additionalDefinitions_make_dot_proto);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   497
        at: 'ADDITIONAL_RULES' put: (self additionalRules_make_dot_proto);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   498
        at: 'ADDITIONAL_TARGETS' put: (self additionalTargets_make_dot_proto);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   499
        at: 'ADDITIONAL_LINK_LIBRARIES' put: (self additionalLinkLibraries_make_dot_proto);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   500
        at: 'DEPENDENCIES' put: (self generateDependencies_unix);
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   501
        yourself
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   502
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   503
    "Created: / 09-08-2006 / 11:20:45 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   504
    "Modified: / 09-08-2006 / 16:44:48 / fm"
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   505
    "Modified: / 14-09-2006 / 18:57:52 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   506
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   507
b17358de5730 initial checkin
fm
parents:
diff changeset
   508
nt_dot_def_mappings
b17358de5730 initial checkin
fm
parents:
diff changeset
   509
b17358de5730 initial checkin
fm
parents:
diff changeset
   510
^Dictionary new
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   511
    at: 'LIBRARY_NAME' put: (self libraryName);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   512
    at: 'DESCRIPTION' put: (self description asString storeString);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   513
    at: 'VERSION_NUMBER' put: (self versionNumber);
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   514
    yourself
b17358de5730 initial checkin
fm
parents:
diff changeset
   515
b17358de5730 initial checkin
fm
parents:
diff changeset
   516
    "Created: / 09-08-2006 / 11:21:21 / fm"
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   517
    "Modified: / 14-09-2006 / 18:58:07 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   518
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   519
b17358de5730 initial checkin
fm
parents:
diff changeset
   520
nt_dot_mak_mappings
9590
4b6cfa035ecb *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9586
diff changeset
   521
    |d resFileName|
4b6cfa035ecb *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9586
diff changeset
   522
4b6cfa035ecb *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9586
diff changeset
   523
    resFileName := (self package copyFrom:(self package lastIndexOfAny:':/')+1),'.res'.
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   524
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   525
    d := super nt_dot_mak_mappings.
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   526
    d
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   527
        at: 'LIBRARY_NAME' put: ( self libraryName );
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   528
        at: 'LOCAL_INCLUDES' put: (self generateLocalIncludes_win32);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   529
        at: 'COMMONSYMFLAG' put: (self commonSymbolsFlag);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   530
        at: 'HEADEROUTPUTARG' put: (self headerFileOutputArg);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   531
        at: 'RESFILENAME' put: resFileName;
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   532
        at: 'ADDITIONAL_DEFINITIONS' put: (self additionalDefinitions_nt_dot_mak);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   533
        at: 'ADDITIONAL_RULES' put: (self additionalRules_nt_dot_mak);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   534
        at: 'ADDITIONAL_TARGETS' put: (self additionalTargets_nt_dot_mak);
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   535
        at: 'DEPENDENCIES' put: (self generateDependencies_win32);
9594
40da6ee6b391 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9593
diff changeset
   536
        yourself.
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   537
    ^ d.
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   538
b17358de5730 initial checkin
fm
parents:
diff changeset
   539
    "Created: / 09-08-2006 / 11:44:36 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   540
    "Modified: / 09-08-2006 / 20:00:01 / fm"
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   541
    "Modified: / 14-09-2006 / 18:58:15 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   542
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   543
9530
fm
parents: 9529
diff changeset
   544
st2c:aString
fm
parents: 9529
diff changeset
   545
        ^ (aString asString
fm
parents: 9529
diff changeset
   546
            copyReplaceString:'_' withString:('_',($_ codePoint printStringRadix:8)))
fm
parents: 9529
diff changeset
   547
                replaceAny:':' with:$_
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   548
! !
b17358de5730 initial checkin
fm
parents:
diff changeset
   549
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
   550
!LibraryDefinition class methodsFor:'mappings support'!
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   551
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   552
commonSymbolsFlag
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   553
    "some libraries are compiled with COMMONSYMBOLS -
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   554
     This saves a lot of space in the generated dll/so files;
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   555
     However, it also requires the librun to be rebuilt, whenever one of
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   556
     the commonSymbols-libs changes.
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   557
     Therefore, NEVER do this for end-user or application libraries;
9632
415a35f8c6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9631
diff changeset
   558
     ONLY do it for a subset of the predefined, eXept-provided standard stx libraries"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   559
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   560
    (
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   561
        #(
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   562
            'stx:libbasic'        'stx:libview'         'stx:libtool'   
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   563
            'stx:libbasic2'       'stx:libview2'        'stx:libtool2'
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   564
            'stx:libbasic3'       'stx:libwidg'         'stx:libhtml'
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   565
            'stx:libcomp'         'stx:libwidg2'        'stx:libui'
9596
8c5b666db3c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9594
diff changeset
   566
            'stx:libboss'         'stx:libdb'
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   567
        )
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   568
    includes:self package) ifTrue:[
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   569
        ^ '$(COMMONSYMBOLS)'
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   570
    ].
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   571
    ^ ''
9547
d39be0b83b82 *** empty log message ***
fm
parents: 9543
diff changeset
   572
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   573
    "Created: / 18-08-2006 / 13:01:52 / cg"
9632
415a35f8c6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9631
diff changeset
   574
    "Modified: / 23-08-2006 / 09:48:11 / cg"
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   575
!
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   577
generateClassLines_libInit_dot_cc
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   578
    ^ String streamContents:[:s |
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   579
        |classNames classesLoaded classNamesUnloaded classNamesSorted putLineForClassName|
9582
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   580
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   581
        putLineForClassName := [:className | 
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   582
                |newClassLine mappings|
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   583
9582
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   584
                mappings := self classLine_libInit_dot_cc_mappings: className.
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   585
                newClassLine := self replaceMappings:mappings in:self classLine_libInit_dot_cc.
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   586
                s nextPutLine: newClassLine 
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   587
            ].
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   588
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   589
        classNames := self common_compiled_classNames.
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   590
        classesLoaded := classNames 
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   591
                    collect:[:nm | |cls| cls := Smalltalk classNamed:nm]
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   592
                    thenSelect:[:cls |  cls notNil and:[cls isLoaded] ].
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   593
        classNamesUnloaded := classNames 
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   594
                    select:[:nm | |cls| cls := Smalltalk classNamed:nm. cls isNil or:[cls isLoaded not]].
9616
7bd19460f53f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9613
diff changeset
   595
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   596
        classNamesSorted := (Class classesSortedByLoadOrder:classesLoaded) collect:[:cls |cls name].
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   597
        
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   598
        classNamesSorted do:putLineForClassName.
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   599
        classNamesUnloaded do:putLineForClassName.
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   600
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   601
        self namesAndAttributesIn:(self additionalClassNamesAndAttributes) do:[:nm :attr |
9622
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
   602
            (attr isEmptyOrNil or:[(attr includes:#autoload) not]) ifTrue:[
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
   603
                putLineForClassName value:nm.
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
   604
            ].
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
   605
        ].
9846503abab1 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9617
diff changeset
   606
9606
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   607
        #(
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   608
                ('UNIX'  #unix)
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   609
                ('WIN32' #win32)
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   610
                ('VMS'   #vms)
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   611
                ('BEOS'  #beos)
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   612
        ) pairsDo:[:ifdef :id|
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   613
            |archClassNames archClassesLoaded|
9606
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   614
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   615
            archClassNames := self compiled_classNamesForArchitecture:id.    
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   616
            archClassesLoaded := archClassNames 
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   617
                        collect:[:nm | |cls| cls := Smalltalk classNamed:nm]
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   618
                        thenSelect:[:cls |  cls notNil and:[cls isLoaded] ].
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   619
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   620
            archClassesLoaded notEmpty ifTrue:[
9606
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   621
                s nextPutLine: '#ifdef ',ifdef.
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   622
                (Class classesSortedByLoadOrder:archClassesLoaded) do:[:cls | putLineForClassName value:cls name].
9606
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   623
                s nextPutLine: '#endif /* ',ifdef,' */'.
229eb8b1cfd5 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9604
diff changeset
   624
            ].
9582
8753d32d0969 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9576
diff changeset
   625
        ].
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   626
    ]
b17358de5730 initial checkin
fm
parents:
diff changeset
   627
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   628
    "
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   629
     bosch_dapasx_datenbasis  generateClassLines_libInit_dot_cc
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   630
     bosch_dapasx_kernel  generateClassLines_libInit_dot_cc
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   631
     stx_libbasic3 generateClassLines_libInit_dot_cc
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   632
    "
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   633
b17358de5730 initial checkin
fm
parents:
diff changeset
   634
    "Created: / 09-08-2006 / 11:21:48 / fm"
9547
d39be0b83b82 *** empty log message ***
fm
parents: 9543
diff changeset
   635
    "Modified: / 16-08-2006 / 18:52:10 / User"
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   636
    "Modified: / 14-09-2006 / 13:11:57 / cg"
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   637
!
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   638
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   639
generateExtensionLine_libInit_dot_cc
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   640
    |mappings|
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   641
9907
8f907d537b9c hasExtensions is a bad name (conflicts with the other query)
Claus Gittinger <cg@exept.de>
parents: 9902
diff changeset
   642
    ^self hasExtensionMethods 
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   643
        ifFalse:['']
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   644
        ifTrue:[ 
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   645
            mappings := self extensionLine_libInit_dot_cc_mappings.
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   646
            self replaceMappings: mappings in: self extensionLine_libInit_dot_cc.]
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   647
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   648
    "
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   649
     DapasXProject generateExtensionLine_libInit_dot_cc
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   650
     DapasX_Datenbasis generateExtensionLine_libInit_dot_cc
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   651
    "
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   652
b17358de5730 initial checkin
fm
parents:
diff changeset
   653
    "Created: / 09-08-2006 / 11:23:34 / fm"
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   654
    "Modified: / 14-09-2006 / 14:19:59 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   655
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   656
9723
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   657
generateLocalIncludes_unix
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   658
    ^ String streamContents:[:s |
9723
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   659
        s nextPutAll:(self localIncludes_unix).
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   660
        self searchForProjectsWhichProvideHeaderFiles
9879
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   661
            do:[:includeProject | 
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   662
                s nextPutAll:' -I$(INCLUDE_TOP)/',(self topRelativePathToPackage_unix: includeProject) 
9723
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   663
            ]
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   664
    ]
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   665
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   666
    "
9832
8ab508c6d9f0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9818
diff changeset
   667
     bosch_dapasx generateLocalIncludes_unix
9879
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   668
     bosch_dapasx_datenbasis generateLocalIncludes_unix  
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   669
     stx_libbasic generateLocalIncludes_unix  
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   670
     stx_libview generateLocalIncludes_unix                   
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   671
     stx_libtool2 generateLocalIncludes_unix            
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   672
     stx_libui generateLocalIncludes_unix   
9723
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   673
    "
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   674
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   675
    "Created: / 09-08-2006 / 16:46:49 / fm"
9879
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   676
    "Modified: / 14-09-2006 / 15:38:16 / cg"
9723
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   677
!
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   678
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   679
generateSubDirectories
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   680
    ^ String streamContents:[:s |
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   681
        self subProjects 
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   682
            do:[:projectID |    
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   683
                s space; nextPutAll:projectID
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   684
            ]
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   685
    ]
b17358de5730 initial checkin
fm
parents:
diff changeset
   686
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   687
    "
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   688
     DapasXProject generateSubDirectories
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   689
     DapasX_Datenbasis generateSubDirectories
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   690
    "
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   691
b17358de5730 initial checkin
fm
parents:
diff changeset
   692
    "Created: / 09-08-2006 / 11:26:59 / fm"
9885
2b52de27eef7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9884
diff changeset
   693
    "Modified: / 14-09-2006 / 18:46:18 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   694
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   695
9503
fd9bf4b0b073 *** empty log message ***
fm
parents: 9502
diff changeset
   696
generateUnixLocalIncludes
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   697
    ^ String streamContents:[:s |
9723
eb72c0ac62cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9680
diff changeset
   698
        s nextPutAll:(self localIncludes_unix).
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   699
        self searchForProjectsWhichProvideHeaderFiles
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   700
            do:[:includeProjectName |    
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   701
                s nextPutAll:' -I',(self pathToPackage_unix: includeProjectName) 
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   702
            ]
9503
fd9bf4b0b073 *** empty log message ***
fm
parents: 9502
diff changeset
   703
    ]
fd9bf4b0b073 *** empty log message ***
fm
parents: 9502
diff changeset
   704
9576
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   705
    "
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   706
     DapasXProject generateLocalIncludes
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   707
     DapasX_Datenbasis generateLocalIncludes
9ff741fe7271 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9568
diff changeset
   708
    "
9503
fd9bf4b0b073 *** empty log message ***
fm
parents: 9502
diff changeset
   709
fd9bf4b0b073 *** empty log message ***
fm
parents: 9502
diff changeset
   710
    "Created: / 09-08-2006 / 16:46:49 / fm"
9851
da6c3e17f89d dependencies
Claus Gittinger <cg@exept.de>
parents: 9847
diff changeset
   711
    "Modified: / 14-09-2006 / 13:22:03 / cg"
9594
40da6ee6b391 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9593
diff changeset
   712
!
40da6ee6b391 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9593
diff changeset
   713
40da6ee6b391 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9593
diff changeset
   714
headerFileOutputArg
9879
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   715
"/    "all stx stuff goes to the common include directory.
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   716
"/     Everything else is left locally"
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   717
"/
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   718
"/    (
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   719
"/        #(
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   720
"/            'stx:libbasic'        'stx:libview'         'stx:libtool'   
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   721
"/            'stx:libbasic2'       'stx:libview2'        'stx:libtool2'
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   722
"/            'stx:libbasic3'       'stx:libwidg'         'stx:libhtml'
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   723
"/            'stx:libcomp'         'stx:libwidg2'        'stx:libui'
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   724
"/            'stx:libboss'         'stx:libdb'
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   725
"/        )
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   726
"/    includes:self package) ifTrue:[
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   727
"/        ^ '-H$(INCLUDE)'
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   728
"/    ].
9594
40da6ee6b391 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9593
diff changeset
   729
    ^ '-H.'
40da6ee6b391 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9593
diff changeset
   730
40da6ee6b391 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9593
diff changeset
   731
    "Created: / 18-08-2006 / 13:01:52 / cg"
9879
6ee07bb4f9e2 local headers
Claus Gittinger <cg@exept.de>
parents: 9853
diff changeset
   732
    "Modified: / 14-09-2006 / 15:38:25 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   733
! !
b17358de5730 initial checkin
fm
parents:
diff changeset
   734
9812
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   735
!LibraryDefinition class methodsFor:'queries'!
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   736
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   737
canHaveExtensions
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   738
    "return true, if this class allows extensions from other packages.
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   739
     Private classes, namespaces and projectDefinitions dont allow this"
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   740
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   741
    ^ self == ApplicationDefinition
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   742
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   743
    "
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   744
     Smalltalk allClasses select:[:each | each canHaveExtensions not]
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   745
    "
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   746
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   747
    "Created: / 30-08-2006 / 15:29:53 / cg"
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   748
! !
ff093d59cd37 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9810
diff changeset
   749
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
   750
!LibraryDefinition class methodsFor:'sanity checks'!
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   751
b17358de5730 initial checkin
fm
parents:
diff changeset
   752
searchForInconsistencies
b17358de5730 initial checkin
fm
parents:
diff changeset
   753
    self searchForNeverCompiledSuperclasses.
b17358de5730 initial checkin
fm
parents:
diff changeset
   754
b17358de5730 initial checkin
fm
parents:
diff changeset
   755
"
b17358de5730 initial checkin
fm
parents:
diff changeset
   756
    self searchForInconsistencies
b17358de5730 initial checkin
fm
parents:
diff changeset
   757
    DapasX_Datenbasis searchForInconsistencies  
b17358de5730 initial checkin
fm
parents:
diff changeset
   758
"
b17358de5730 initial checkin
fm
parents:
diff changeset
   759
b17358de5730 initial checkin
fm
parents:
diff changeset
   760
    "Created: / 09-08-2006 / 16:30:46 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   761
!
b17358de5730 initial checkin
fm
parents:
diff changeset
   762
b17358de5730 initial checkin
fm
parents:
diff changeset
   763
searchForNeverCompiledSuperclasses
9495
36b012644f9d *** empty log message ***
fm
parents: 9493
diff changeset
   764
      self compiled_classesDo:[:includedClass | 
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   765
            includedClass allSuperclassesDo:[:eachSuperClass |
b17358de5730 initial checkin
fm
parents:
diff changeset
   766
                eachSuperClass package == Project noProjectID ifTrue:[ 
b17358de5730 initial checkin
fm
parents:
diff changeset
   767
                    self inconsistency:'uncompiled superclass: ' , eachSuperClass name
b17358de5730 initial checkin
fm
parents:
diff changeset
   768
                ].
b17358de5730 initial checkin
fm
parents:
diff changeset
   769
            ]
b17358de5730 initial checkin
fm
parents:
diff changeset
   770
      ].
b17358de5730 initial checkin
fm
parents:
diff changeset
   771
b17358de5730 initial checkin
fm
parents:
diff changeset
   772
"
b17358de5730 initial checkin
fm
parents:
diff changeset
   773
    self searchForNeverCompiledSuperclasses
b17358de5730 initial checkin
fm
parents:
diff changeset
   774
    DapasX_Datenbasis searchForNeverCompiledSuperclasses  
b17358de5730 initial checkin
fm
parents:
diff changeset
   775
"
b17358de5730 initial checkin
fm
parents:
diff changeset
   776
b17358de5730 initial checkin
fm
parents:
diff changeset
   777
    "Created: / 09-08-2006 / 16:31:54 / fm"
b17358de5730 initial checkin
fm
parents:
diff changeset
   778
! !
b17358de5730 initial checkin
fm
parents:
diff changeset
   779
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
   780
!LibraryDefinition class methodsFor:'testing'!
9558
510ca1ebce30 code cleanup
Claus Gittinger <cg@exept.de>
parents: 9547
diff changeset
   781
9666
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   782
isLibraryDefinition
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   783
    ^ self ~~ LibraryDefinition
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   784
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   785
    "
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   786
     stx_libboss isLibraryDefinition
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   787
     ProjectDefinition isLibraryDefinition
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   788
     LibraryDefinition isLibraryDefinition
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   789
    "
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   790
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   791
    "Created: / 23-08-2006 / 15:17:50 / cg"
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   792
!
cdcff7e1794f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9633
diff changeset
   793
9558
510ca1ebce30 code cleanup
Claus Gittinger <cg@exept.de>
parents: 9547
diff changeset
   794
isProjectDefinition
9611
855d919d5040 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9608
diff changeset
   795
    ^ self ~~ LibraryDefinition
9558
510ca1ebce30 code cleanup
Claus Gittinger <cg@exept.de>
parents: 9547
diff changeset
   796
9612
450e2a5676da *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9611
diff changeset
   797
    "
450e2a5676da *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9611
diff changeset
   798
     stx_libboss isProjectDefinition
450e2a5676da *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9611
diff changeset
   799
     ProjectDefinition isProjectDefinition
450e2a5676da *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9611
diff changeset
   800
    "
450e2a5676da *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9611
diff changeset
   801
9558
510ca1ebce30 code cleanup
Claus Gittinger <cg@exept.de>
parents: 9547
diff changeset
   802
    "Created: / 17-08-2006 / 14:11:46 / cg"
9612
450e2a5676da *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9611
diff changeset
   803
    "Modified: / 21-08-2006 / 15:50:13 / cg"
9558
510ca1ebce30 code cleanup
Claus Gittinger <cg@exept.de>
parents: 9547
diff changeset
   804
! !
510ca1ebce30 code cleanup
Claus Gittinger <cg@exept.de>
parents: 9547
diff changeset
   805
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
   806
!LibraryDefinition class methodsFor:'update description'!
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   807
9797
eaeda1ffdec4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9744
diff changeset
   808
forEachMethodsCodeToCompileDo:aTwoArgBlock ignoreOldDefinition:ignoreOldDefinition
eaeda1ffdec4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9744
diff changeset
   809
    super forEachMethodsCodeToCompileDo:aTwoArgBlock ignoreOldDefinition:ignoreOldDefinition.
9586
eb87399baea3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9582
diff changeset
   810
9514
761b3f12d37c hook for compilation
Claus Gittinger <cg@exept.de>
parents: 9513
diff changeset
   811
    "Created: / 10-08-2006 / 16:35:47 / cg"
9586
eb87399baea3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9582
diff changeset
   812
    "Modified: / 18-08-2006 / 16:22:49 / cg"
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   813
! !
b17358de5730 initial checkin
fm
parents:
diff changeset
   814
9568
7d41a61ebd34 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9558
diff changeset
   815
!LibraryDefinition class methodsFor:'documentation'!
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   816
b17358de5730 initial checkin
fm
parents:
diff changeset
   817
version
9907
8f907d537b9c hasExtensions is a bad name (conflicts with the other query)
Claus Gittinger <cg@exept.de>
parents: 9902
diff changeset
   818
    ^ '$Header: /cvs/stx/stx/libbasic/LibraryDefinition.st,v 1.67 2006-09-15 17:34:16 cg Exp $'
9493
b17358de5730 initial checkin
fm
parents:
diff changeset
   819
! !