ApplicationDefinition.st
author Claus Gittinger <cg@exept.de>
Thu, 14 Sep 2006 20:28:06 +0200
changeset 9890 047b99b0334a
parent 9889 c480dd24d0b6
child 9892 5144580f1220
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
9552
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
     1
"
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
     2
 COPYRIGHT (c) 2006 by eXept Software AG
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
     3
              All Rights Reserved
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
     4
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
     5
 This software is furnished under a license and may be used
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
     6
 only in accordance with the terms of that license and with the
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
     8
 be provided or otherwise made available to, or used by, any
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
     9
 other person.  No title to or ownership of the software is
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    10
 hereby transferred.
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    11
"
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    12
9671
cb20763db715 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9669
diff changeset
    13
"{ Package: 'stx:libbasic' }"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    14
9567
dff3e4bd9de2 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9557
diff changeset
    15
ProjectDefinition subclass:#ApplicationDefinition
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    16
	instanceVariableNames:''
c897f2e72672 initial checkin
fm
parents:
diff changeset
    17
	classVariableNames:''
c897f2e72672 initial checkin
fm
parents:
diff changeset
    18
	poolDictionaries:''
c897f2e72672 initial checkin
fm
parents:
diff changeset
    19
	category:'System-Support-Projects'
c897f2e72672 initial checkin
fm
parents:
diff changeset
    20
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
    21
9552
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    22
!ApplicationDefinition class methodsFor:'documentation'!
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    23
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    24
copyright
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    25
"
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    26
 COPYRIGHT (c) 2006 by eXept Software AG
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    27
              All Rights Reserved
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    28
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    29
 This software is furnished under a license and may be used
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    30
 only in accordance with the terms of that license and with the
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    31
 inclusion of the above copyright notice.   This software may not
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    32
 be provided or otherwise made available to, or used by, any
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    33
 other person.  No title to or ownership of the software is
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    34
 hereby transferred.
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    35
"
4f4b3f5cfc53 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9542
diff changeset
    36
! !
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    37
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
    38
!ApplicationDefinition class methodsFor:'accessing'!
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    39
c897f2e72672 initial checkin
fm
parents:
diff changeset
    40
applicationName
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    41
    |m path|
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    42
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    43
    m := self moduleDirectory.
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    44
    path := m subStrings:$/.
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    45
    path last = 'application' ifTrue:[
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    46
        path size > 1 ifTrue:[
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    47
            path := path copyWithoutLast:1.
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    48
        ].
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    49
    ].
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    50
    ^ path last
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    51
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    52
    "
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    53
     bosch_dapasx_application applicationName     
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    54
     stx_projects_smalltalk applicationName     
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    55
    "
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    56
c897f2e72672 initial checkin
fm
parents:
diff changeset
    57
    "Created: / 08-08-2006 / 20:25:39 / fm"
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
    58
    "Modified: / 30-08-2006 / 19:29:25 / cg"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
    59
! !
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    60
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
    61
!ApplicationDefinition class methodsFor:'defaults'!
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    62
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
    63
defaultDescription
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
    64
    ^ 'an application'
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    65
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
    66
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    67
guiClassFileNames_unix
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    68
    ^ self guiClasses_unix 
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    69
        collect:[:cls | (cls classFilename asFilename withSuffix:'so') baseName].
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    70
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    71
    "Created: / 14-09-2006 / 18:13:22 / cg"
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    72
!
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    73
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
    74
guiClassFileNames_win32
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
    75
    ^ self guiClasses_win32 
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    76
        collect:[:cls | (cls classFilename asFilename withSuffix:'dll') baseName].
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
    77
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
    78
    "Created: / 07-09-2006 / 17:23:13 / cg"
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    79
    "Modified: / 14-09-2006 / 18:13:46 / cg"
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    80
!
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    81
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    82
guiClasses_unix
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    83
    ^ #()
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    84
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    85
    "Created: / 14-09-2006 / 18:12:58 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    86
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
    87
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
    88
guiClasses_win32
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    89
    ^ #()
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    90
    "/ ^ Array with:XWorkstation
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
    91
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
    92
    "Created: / 07-09-2006 / 17:22:27 / cg"
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
    93
    "Modified: / 14-09-2006 / 18:12:35 / cg"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
    94
!
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    95
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
    96
needResources
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
    97
    ^ self isGUIApplication
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
    98
! !
c897f2e72672 initial checkin
fm
parents:
diff changeset
    99
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   100
!ApplicationDefinition class methodsFor:'description'!
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   101
c897f2e72672 initial checkin
fm
parents:
diff changeset
   102
excludedFromPreRequisites  
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   103
    "list packages which are to be explicitely excluded from the automatic constructed
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   104
     prerequisites list. If empty, everything that is found along the inheritance of any of
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   105
     my classes is considered to be a prerequisite package."
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   106
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   107
    ^ #()
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   108
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   109
    "Modified: / 17-08-2006 / 19:48:59 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   110
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   111
c897f2e72672 initial checkin
fm
parents:
diff changeset
   112
excludedFromSubProjects
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   113
    "list packages which are to be explicitely excluded from the automatic constructed
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   114
     subProjects list. If empty, every sub-package is included as a prerequisite."
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   115
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   116
    ^ #()
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   117
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   118
    "Modified: / 17-08-2006 / 19:49:40 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   119
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   120
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   121
isGUIApplication
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   122
    "Return true, if this is a GUI app. 
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   123
     Redefine to return false for non-GUI applications (affects inclusion of Display classes)."
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   124
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   125
    ^true
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   126
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   127
    "Created: / 08-08-2006 / 11:15:01 / fm"
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   128
    "Modified: / 17-08-2006 / 19:47:36 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   129
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   130
9823
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   131
isSingleThreadedApplication
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   132
    "Return true, if this should be started without multiple threads. 
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   133
     (not possible with gui applications)"
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   134
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   135
    ^false
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   136
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   137
    "Created: / 05-09-2006 / 13:36:18 / cg"
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   138
!
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   139
9725
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   140
startupClassName
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   141
    "The name of the class which provides the entry point for the application."
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   142
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   143
    self subclassResponsibility
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   144
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   145
    "Modified: / 17-08-2006 / 20:00:22 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   146
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   147
9725
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   148
startupSelector
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   149
    "The name of the entry point method (in startUpClass) used to start the application."
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   150
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   151
    ^ #'start'
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   152
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   153
    "Modified: / 17-08-2006 / 20:01:00 / cg"
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   154
! !
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   155
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   156
!ApplicationDefinition class methodsFor:'description - project information'!
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   157
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   158
description
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   159
    "Returns a description string which will appear in nt.def / bc.def"
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   160
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   161
    self module = 'stx' ifTrue:[
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   162
        ^ 'Smalltalk/X Application'
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   163
    ].
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   164
9587
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   165
    ^ 'Application'
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   166
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   167
    "Created: / 17-08-2006 / 20:52:48 / cg"
9587
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   168
    "Modified: / 18-08-2006 / 16:16:01 / cg"
9889
c480dd24d0b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9886
diff changeset
   169
!
c480dd24d0b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9886
diff changeset
   170
c480dd24d0b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9886
diff changeset
   171
fileDescription
c480dd24d0b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9886
diff changeset
   172
    "Return a description string which will appear in nt.def / bc.def"
c480dd24d0b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9886
diff changeset
   173
c480dd24d0b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9886
diff changeset
   174
    ^self description , ' Application'
c480dd24d0b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9886
diff changeset
   175
c480dd24d0b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9886
diff changeset
   176
    "Created: / 14-09-2006 / 20:08:11 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   177
! !
c897f2e72672 initial checkin
fm
parents:
diff changeset
   178
c897f2e72672 initial checkin
fm
parents:
diff changeset
   179
!ApplicationDefinition class methodsFor:'file generation'!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   180
9854
d1ae554dd112 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9835
diff changeset
   181
basicFileNamesToGenerate
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   182
    ^ #( 
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   183
          #('Make.spec'         #'generate_make_dot_spec')
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   184
"/          #('Make.proto'        #'generate_make_dot_proto')
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   185
"
9605
c3c37bcb3bcf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9587
diff changeset
   186
          #('libInit.cc'        #'generate_libInit_dot_cc')
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   187
"
9605
c3c37bcb3bcf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9587
diff changeset
   188
          #('bc.def'            #'generate_bc_dot_def')
c3c37bcb3bcf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9587
diff changeset
   189
          #('nt.mak'            #'generate_nt_dot_mak')
c3c37bcb3bcf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9587
diff changeset
   190
          #('modules.stx'       #'generate_modules_dot_stx')
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   191
"
9605
c3c37bcb3bcf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9587
diff changeset
   192
          #('nt.def'            #'generate_nt_dot_def')
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   193
"
9605
c3c37bcb3bcf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9587
diff changeset
   194
          #('abbrev.stc'        #'generate_abbrev_dot_stc') 
c3c37bcb3bcf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9587
diff changeset
   195
          #('bmake.bat'         #'generate_bmake_dot_mak') 
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   196
"/          #('buildDate.h'       #'generate_buildDate_dot_h')   -- done by nt.mak
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   197
     )
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   198
9854
d1ae554dd112 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9835
diff changeset
   199
    "Created: / 14-09-2006 / 14:36:00 / cg"
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   200
    "Modified: / 14-09-2006 / 17:51:10 / cg"
9623
474878a8887e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9614
diff changeset
   201
!
474878a8887e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9614
diff changeset
   202
474878a8887e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9614
diff changeset
   203
generateFile:filename
474878a8887e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9614
diff changeset
   204
    ^ super generateFile:filename
474878a8887e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9614
diff changeset
   205
474878a8887e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9614
diff changeset
   206
    "Created: / 22-08-2006 / 18:35:40 / cg"
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   207
    "Modified: / 30-08-2006 / 19:23:12 / cg"
9830
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   208
!
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   209
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   210
rcFilename
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   211
    ^ self packageName,'WinRC.rc'.
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   212
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   213
    "Created: / 07-09-2006 / 17:07:08 / cg"
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   214
!
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   215
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   216
resourceFilename
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   217
    ^ (self rcFilename asFilename withSuffix:'res') name
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   218
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   219
    "Created: / 07-09-2006 / 17:12:53 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   220
! !
c897f2e72672 initial checkin
fm
parents:
diff changeset
   221
c897f2e72672 initial checkin
fm
parents:
diff changeset
   222
!ApplicationDefinition class methodsFor:'file templates'!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   223
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   224
bc_dot_def
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   225
    "the template code for the bc.def file"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   226
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   227
^ 
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   228
'DESCRIPTION     %(DESCRIPTION)
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   229
CODE            PRELOAD MOVEABLE DISCARDABLE
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   230
SEGMENTS
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   231
    INITCODE    PRELOAD DISCARDABLE
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   232
'
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   233
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   234
    "Created: / 08-08-2006 / 12:26:58 / fm"
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   235
    "Modified: / 08-08-2006 / 19:32:27 / fm"
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   236
    "Modified: / 17-08-2006 / 20:05:17 / cg"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   237
!
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   238
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   239
buildDate_dot_h
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   240
    "the template code for the buildDate.h file"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   241
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   242
^ 
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   243
'#define BUILD_DATE "%(BUILDDATE)"'
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   244
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   245
    "Created: / 30-08-2006 / 19:18:34 / cg"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   246
!
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   247
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   248
modules_dot_stx
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   249
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   250
^ 
9542
06d0781c889c *** empty log message ***
fm
parents: 9539
diff changeset
   251
'# $','Header','$
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   252
#
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   253
# DO NOT EDIT 
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   254
# automagically generated from the projectDefinition: ',self name,'.
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   255
#
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   256
# Warning: once you modify this file, do not rerun
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   257
# stmkmp or projectDefinition-build again - otherwise, your changes are lost.
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   258
#
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   259
# This file is (currently) only used with win-95 / win-NT versions of STX.
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   260
# It lists the dll''s which are to be loaded at startup time.
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   261
#
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   262
# All classes loaded at startup time will be present as precompiled classes.
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   263
# Others will be autoloaded.
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   264
#
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   265
%(PREREQUISITE_LIBS)
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   266
%(SUBPROJECT_LIBS)
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   267
'
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   268
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   269
    "Created: / 08-08-2006 / 12:26:58 / fm"
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   270
    "Modified: / 08-08-2006 / 19:32:27 / fm"
9542
06d0781c889c *** empty log message ***
fm
parents: 9539
diff changeset
   271
    "Modified: / 16-08-2006 / 17:56:58 / User"
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   272
    "Modified: / 17-08-2006 / 20:35:38 / cg"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   273
!
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   274
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   275
nt_dot_mak
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   276
    |def needResources|
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   277
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   278
    needResources := false "self isGUIApplication".
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   279
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   280
    def :=
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   281
'# $','Header','$
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   282
#
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   283
# DO NOT EDIT 
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   284
# automagically generated from the projectDefinition: ',self name,'.
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   285
#
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   286
# Warning: once you modify this file, do not rerun
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   287
# stmkmp or projectDefinition-build again - otherwise, your changes are lost.
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   288
#
c897f2e72672 initial checkin
fm
parents:
diff changeset
   289
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   290
TOP=%(TOP)       
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   291
INCLUDE_TOP=$(TOP)\..
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   292
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   293
# CFLAGS1= -WD -w-pro -w-ccc -w-rch -w-aus -w-par -x- -r- -k -y -v -vi- -c -tWDR
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   294
CFLAGS1= -w-pro -w-ccc -w-rch -w-aus -w-par -x- -r- -k -y -v -vi- -c
c897f2e72672 initial checkin
fm
parents:
diff changeset
   295
c897f2e72672 initial checkin
fm
parents:
diff changeset
   296
CFLAGS_CONSOLE=
c897f2e72672 initial checkin
fm
parents:
diff changeset
   297
CFLAGS_NOCONSOLE=-tWR -D_NO_VCL;WIN32GUI;WIN32 -DWIN_LOGFILE="\"%(APPLICATION)_%%d.log\""
c897f2e72672 initial checkin
fm
parents:
diff changeset
   298
LFLAGS_CONSOLE=-ap
c897f2e72672 initial checkin
fm
parents:
diff changeset
   299
LFLAGS_NOCONSOLE=-aa
c897f2e72672 initial checkin
fm
parents:
diff changeset
   300
CRT_STARTUP_CONSOLE=c0x32.obj
c897f2e72672 initial checkin
fm
parents:
diff changeset
   301
CRT_STARTUP_NOCONSOLE=c0w32.obj
c897f2e72672 initial checkin
fm
parents:
diff changeset
   302
c897f2e72672 initial checkin
fm
parents:
diff changeset
   303
CFLAGS_APPTYPE=$(CFLAGS_NOCONSOLE)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   304
LFLAGS_APPTYPE=$(LFLAGS_NOCONSOLE)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   305
CRT_STARTUP=$(CRT_STARTUP_NOCONSOLE)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   306
9614
7568b20927ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9605
diff changeset
   307
CFLAGS_LOCAL=$(CFLAGS_APPTYPE) \
7568b20927ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9605
diff changeset
   308
 -DSTARTUP_CLASS="\"%(STARTUP_CLASS)\"" \
7568b20927ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9605
diff changeset
   309
 -DSTARTUP_SELECTOR="\"%(STARTUP_SELECTOR)\"" \
7568b20927ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9605
diff changeset
   310
 -DUSE_MODULE_TABLE
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   311
c897f2e72672 initial checkin
fm
parents:
diff changeset
   312
#
c897f2e72672 initial checkin
fm
parents:
diff changeset
   313
c897f2e72672 initial checkin
fm
parents:
diff changeset
   314
!!INCLUDE $(TOP)\rules\stdHeader_nt
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   315
!!INCLUDE Make.spec
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   316
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   317
OBJS= $(COMMON_OBJS) $(WIN32_OBJS)
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   318
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   319
#
c897f2e72672 initial checkin
fm
parents:
diff changeset
   320
LIBNAME=dummy
c897f2e72672 initial checkin
fm
parents:
diff changeset
   321
STCOPT="+optinline"
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   322
LOCALINCLUDES=%(LOCAL_INCLUDES)
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   323
STCLOCALOPT=''-package=$(PACKAGE)'' $(LOCALINCLUDES) %(HEADEROUTPUTARG) $(STCLOCALOPTIMIZATIONS) $(STCWARNINGS) $(LOCALDEFINES) $(COMMONSYMFLAG) -varPrefix=$(LIBNAME)
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   324
c897f2e72672 initial checkin
fm
parents:
diff changeset
   325
LINKER = ilink32
c897f2e72672 initial checkin
fm
parents:
diff changeset
   326
c897f2e72672 initial checkin
fm
parents:
diff changeset
   327
# LFLAGS = -L$(TOP)\libbc;$(BCB)\lib;$(DEBUGLIBPATH) -H:0x400000 -Hc:0x100000 -S:0x40000 -Sc:0x10000 -ap -Tpe -x -Gn -v -Ao:0x10000
c897f2e72672 initial checkin
fm
parents:
diff changeset
   328
LFLAGS = -L$(TOP)\libbc;$(BCB)\lib -S:0x40000 -Sc:0x10000 $(LFLAGS_APPTYPE) -Tpe -x -Gn -v -Ao:0x10000
c897f2e72672 initial checkin
fm
parents:
diff changeset
   329
c897f2e72672 initial checkin
fm
parents:
diff changeset
   330
PROJECT = %(APPLICATION).exe
c897f2e72672 initial checkin
fm
parents:
diff changeset
   331
ALLOBJFILES = main.obj
9830
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   332
RESFILES = %(RESFILENAME)
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   333
ALLOBJ = $(CRT_STARTUP) $(ALLOBJFILES) $(OBJS)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   334
DEFFILE=bc.def
c897f2e72672 initial checkin
fm
parents:
diff changeset
   335
c897f2e72672 initial checkin
fm
parents:
diff changeset
   336
LIBFILES=$(TOP)\libbc\librun.lib
c897f2e72672 initial checkin
fm
parents:
diff changeset
   337
ALLLIB=$(LIBFILES) import32.lib $(RT_LIB)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   338
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   339
REQUIRED_LIBS=librun.dll %(REQUIRED_LIBS)
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   340
REQUIRED_FILES=cs3245.dll symbols.stc $(REQUIRED_LIBS)
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   341
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   342
REQUIRED_SUPPORT_DIRS=%(REQUIRED_SUPPORT_DIRS)
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   343
9830
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   344
ALL:: $(OUTDIR) $(OBJS) $(REQUIRED_FILES) show $(PROJECT) $(REQUIRED_SUPPORT_DIRS)
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   345
c897f2e72672 initial checkin
fm
parents:
diff changeset
   346
setup: install_%(APPLICATION).exe
c897f2e72672 initial checkin
fm
parents:
diff changeset
   347
c897f2e72672 initial checkin
fm
parents:
diff changeset
   348
# This uses the Nullsoft Installer Package and works in Windows only
c897f2e72672 initial checkin
fm
parents:
diff changeset
   349
c897f2e72672 initial checkin
fm
parents:
diff changeset
   350
install_%(APPLICATION).exe: $(PROJECT) %(APPLICATION).nsi
c897f2e72672 initial checkin
fm
parents:
diff changeset
   351
    makensis %(APPLICATION).nsi
c897f2e72672 initial checkin
fm
parents:
diff changeset
   352
c897f2e72672 initial checkin
fm
parents:
diff changeset
   353
new:
c897f2e72672 initial checkin
fm
parents:
diff changeset
   354
    bmake clean
c897f2e72672 initial checkin
fm
parents:
diff changeset
   355
    bmake
c897f2e72672 initial checkin
fm
parents:
diff changeset
   356
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   357
%(RESOURCE_RULES)
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   358
c897f2e72672 initial checkin
fm
parents:
diff changeset
   359
%(PREREQUISITES_LIBS)      
c897f2e72672 initial checkin
fm
parents:
diff changeset
   360
%(SUBPROJECTS_LIBS)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   361
c897f2e72672 initial checkin
fm
parents:
diff changeset
   362
show:
c897f2e72672 initial checkin
fm
parents:
diff changeset
   363
    @echo LFLAGS= $(LFLAGS)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   364
    @echo ALLOBJ= $(ALLOBJ)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   365
    @echo PROJECT= $(PROJECT)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   366
    @echo ALLLIB= $(ALLLIB)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   367
    @echo DEFFILE= $(DEFFILE)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   368
    @echo ALLRES= $(ALLRES)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   369
c897f2e72672 initial checkin
fm
parents:
diff changeset
   370
$(PROJECT): $(ALLOBJFILES) $(OBJS) $(RESFILES) $(DEFFILE)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   371
    $(BCB)\BIN\$(LINKER) $(LFLAGS) $(ALLOBJ), $(PROJECT),,  $(ALLLIB),  $(DEFFILE),  $(RESFILES)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   372
c897f2e72672 initial checkin
fm
parents:
diff changeset
   373
#$(PROJECT): $(ALLOBJFILES) $(RESFILES) $(DEFFILE)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   374
#    $(BCB)\BIN\$(LINKER) @&&!!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   375
#    $(LFLAGS) +
c897f2e72672 initial checkin
fm
parents:
diff changeset
   376
#    $(ALLOBJ), +
c897f2e72672 initial checkin
fm
parents:
diff changeset
   377
#    $(PROJECT),, +
c897f2e72672 initial checkin
fm
parents:
diff changeset
   378
#    $(ALLLIB), +
c897f2e72672 initial checkin
fm
parents:
diff changeset
   379
#    $(DEFFILE), +
c897f2e72672 initial checkin
fm
parents:
diff changeset
   380
#    $(RESFILES)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   381
#!!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   382
c897f2e72672 initial checkin
fm
parents:
diff changeset
   383
c897f2e72672 initial checkin
fm
parents:
diff changeset
   384
!!INCLUDE $(TOP)\rules\stdRules_nt
c897f2e72672 initial checkin
fm
parents:
diff changeset
   385
c897f2e72672 initial checkin
fm
parents:
diff changeset
   386
#
c897f2e72672 initial checkin
fm
parents:
diff changeset
   387
# additional rules
c897f2e72672 initial checkin
fm
parents:
diff changeset
   388
#
9830
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   389
%(APPLICATION)Win.res: %(APPLICATION)Win.rc %(APPLICATION).ico
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   390
c897f2e72672 initial checkin
fm
parents:
diff changeset
   391
main.obj: buildDate.h main.c nt.mak
c897f2e72672 initial checkin
fm
parents:
diff changeset
   392
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   393
main.c: $(TOP)\librun\main.c
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   394
        copy $(TOP)\librun\main.c main.c
c897f2e72672 initial checkin
fm
parents:
diff changeset
   395
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   396
buildDate.h: $(TOP)\librun\genDate.exe
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   397
        $(TOP)\librun\genDate.exe
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   398
c897f2e72672 initial checkin
fm
parents:
diff changeset
   399
librun.dll: $(TOP)\librun\librun.dll
c897f2e72672 initial checkin
fm
parents:
diff changeset
   400
        copy $(TOP)\librun\librun.dll librun.dll
c897f2e72672 initial checkin
fm
parents:
diff changeset
   401
c897f2e72672 initial checkin
fm
parents:
diff changeset
   402
cs3245.dll: $(TOP)\support\win32\borland\cs3245.dll
c897f2e72672 initial checkin
fm
parents:
diff changeset
   403
        copy $(TOP)\support\win32\borland\cs3245.dll cs3245.dll
c897f2e72672 initial checkin
fm
parents:
diff changeset
   404
c897f2e72672 initial checkin
fm
parents:
diff changeset
   405
symbols.stc: $(TOP)\include\symbols.stc
c897f2e72672 initial checkin
fm
parents:
diff changeset
   406
        copy $(TOP)\include\symbols.stc symbols.stc
c897f2e72672 initial checkin
fm
parents:
diff changeset
   407
9830
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   408
clobber::
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   409
        -del librun.dll
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   410
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   411
clean::
c897f2e72672 initial checkin
fm
parents:
diff changeset
   412
        -del genDate.exe
c897f2e72672 initial checkin
fm
parents:
diff changeset
   413
        -del c0x32.dll
c897f2e72672 initial checkin
fm
parents:
diff changeset
   414
        -del c0x32.lib
c897f2e72672 initial checkin
fm
parents:
diff changeset
   415
        -del buildDate.h
c897f2e72672 initial checkin
fm
parents:
diff changeset
   416
        -del $(PROJECT)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   417
        -del install_%(APPLICATION).exe
c897f2e72672 initial checkin
fm
parents:
diff changeset
   418
        -del stx.lib
c897f2e72672 initial checkin
fm
parents:
diff changeset
   419
        -del stx.dll
c897f2e72672 initial checkin
fm
parents:
diff changeset
   420
        -del cs3245.dll
c897f2e72672 initial checkin
fm
parents:
diff changeset
   421
        -del $(REQUIRED_FILES)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   422
        -del main.c
c897f2e72672 initial checkin
fm
parents:
diff changeset
   423
        -del *.log
9830
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   424
        -del *.res
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   425
        -rmdir /S /Q resources
c897f2e72672 initial checkin
fm
parents:
diff changeset
   426
        -rmdir /S /Q objbc
c897f2e72672 initial checkin
fm
parents:
diff changeset
   427
9830
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   428
clobber::
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   429
        -del *.dll
8639c1f2c1c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9823
diff changeset
   430
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   431
# BEGINMAKEDEPEND --- do not remove this line; make depend needs it
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   432
%(DEPENDENCIES)
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   433
# ENDMAKEDEPEND --- do not remove this line
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   434
'.
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   435
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   436
        ^ def.
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   437
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   438
    "Modified: / 14-09-2006 / 18:10:02 / cg"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   439
!
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   440
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   441
nt_dot_mak_resource_rules
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   442
    ^ '
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   443
9890
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   444
RESOURCEFILES: %(APPLICATION)_RESOURCES %(APPLICATION)_BITMAPS stx_RESOURCES stx_STYLES stx_BITMAPS
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   445
9890
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   446
%(APPLICATION)_RESOURCES: resources\%(MODULE)\%(MODULE_PATH)\NUL
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   447
        copy ..\resources\*.rs resources\%(MODULE)\%(MODULE_PATH)\*.*
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   448
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   449
%(APPLICATION)_BITMAPS: resources\%(MODULE)\%(MODULE_PATH)\bitmaps
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   450
        copy *.ico resources\%(MODULE)\%(MODULE_PATH)\bitmaps\*.*
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   451
        copy *.gif resources\%(MODULE)\%(MODULE_PATH)\bitmaps\*.*
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   452
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   453
stx_RESOURCES: \
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   454
        libbasic_RESOURCES \
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   455
        libtool_RESOURCES  \
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   456
        libtool2_RESOURCES  \
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   457
        libview_RESOURCES  \
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   458
        libview2_RESOURCES
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   459
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   460
stx_STYLES: resources\stx\libview\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   461
        copy $(TOP)\libview\styles\mswindowsXP* resources\stx\libview\*.*
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   462
        copy $(TOP)\libview\styles\mswindows*.common resources\stx\libview\*.*
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   463
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   464
stx_BITMAPS: \
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   465
        libwidg_BITMAPS
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   466
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   467
libwidg_BITMAPS: resources\stx\libwidg\bitmaps\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   468
        copy $(TOP)\libwidg\bitmaps\*.xpm resources\stx\libwidg\bitmaps\*.*
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   469
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   470
libbasic_RESOURCES: resources\stx\libbasic\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   471
        copy $(TOP)\libbasic\resources\*.rs resources\stx\libbasic\*.*
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   472
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   473
libtool_RESOURCES: resources\stx\libtool\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   474
        copy $(TOP)\libtool\resources\*.rs resources\stx\libtool\*.*
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   475
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   476
libtool2_RESOURCES: resources\stx\libtool2\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   477
        copy $(TOP)\libtool2\resources\*.rs resources\stx\libtool2\*.*
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   478
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   479
libview_RESOURCES: resources\stx\libview\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   480
        copy $(TOP)\libview\resources\*.rs resources\stx\libview\*.*
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   481
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   482
libview2_RESOURCES: resources\stx\libview2\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   483
        copy $(TOP)\libview2\resources\*.rs resources\stx\libview2\*.*
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   484
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   485
resources\stx\libbasic\NUL: resources\stx\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   486
        mkdir resources\stx\libbasic
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   487
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   488
resources\stx\libtool\NUL: resources\stx\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   489
        mkdir resources\stx\libtool
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   490
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   491
resources\stx\libtool2\NUL: resources\stx\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   492
        mkdir resources\stx\libtool2
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   493
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   494
resources\stx\libview\NUL: resources\stx\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   495
        mkdir resources\stx\libview
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   496
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   497
resources\stx\libview2\NUL: resources\stx\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   498
        mkdir resources\stx\libview2
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   499
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   500
resources\stx\libwidg\bitmaps\NUL: resources\stx\libwidg\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   501
        mkdir resources\stx\libwidg\bitmaps
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   502
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   503
resources\stx\libwidg\NUL: resources\stx\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   504
        mkdir resources\stx\libwidg
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   505
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   506
resources\stx\NUL: resources\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   507
        mkdir resources\stx
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   508
9890
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   509
resources\%(MODULE)\%(MODULE_PATH)\bitmaps: resources\%(MODULE)\%(MODULE_PATH)\NUL
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   510
        mkdir resources\%(MODULE)\%(MODULE_PATH)\bitmaps
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   511
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   512
resources\%(MODULE)\%(MODULE_PATH)\NUL: resources\%(MODULE)\NUL
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   513
        mkdir resources\%(MODULE)\%(MODULE_PATH)
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   514
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   515
resources\%(MODULE)\NUL: resources\NUL
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   516
        mkdir resources\%(MODULE)
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   517
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   518
resources\NUL:
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   519
        mkdir resources
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   520
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   521
bitmaps\NUL:
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   522
        mkdir bitmaps
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   523
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   524
doc\NUL:
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   525
        mkdir doc
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   526
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   527
'.
9890
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   528
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
   529
    "Modified: / 14-09-2006 / 20:20:42 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   530
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   531
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   532
packageName_dot_rc
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   533
    "the template code for the <appname>.rc file"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   534
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   535
^ 
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   536
'//
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   537
// DO NOT EDIT 
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   538
// automagically generated from the projectDefinition: ',self name,'.
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   539
//
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   540
#define IDR_MAINFRAME                   128
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   541
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   542
LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   543
#pragma code_page(1252)
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   544
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   545
%(ICONDEFINITION_LINE)
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   546
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   547
VS_VERSION_INFO VERSIONINFO
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   548
  FILEVERSION     %(FILE_VERSION_COMMASEPARATED)
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   549
  PRODUCTVERSION  %(PRODUCT_VERSION_COMMASEPARATED)
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   550
//  FILEFLAGSMASK 0x3fL
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   551
  FILEFLAGSMASK   VS_FF_DEBUG | VS_FF_PRERELEASE
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   552
  FILEFLAGS       VS_FF_PRERELEASE | VS_FF_SPECIALBUILD
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   553
  FILEOS          VOS_NT_WINDOWS32
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   554
  FILETYPE        %(FILETYPE)
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   555
  FILESUBTYPE     VS_USER_DEFINED
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   556
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   557
BEGIN
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   558
  BLOCK "StringFileInfo"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   559
  BEGIN
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   560
    BLOCK "040904E4"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   561
    BEGIN
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   562
      VALUE "CompanyName", "%(COMPANY_NAME)\0"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   563
      VALUE "FileDescription", "%(FILE_DESCRIPTION)\0"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   564
      VALUE "FileVersion", "%(FILE_VERSION)\0"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   565
//      VALUE "OriginalFilename", "DAPASX.EXE\0"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   566
      VALUE "InternalName", "%(INTERNAL_NAME)\0"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   567
%(LEGAL_COPYRIGHT_LINE)
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   568
      VALUE "ProductName", "%(PRODUCT_NAME)\0"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   569
      VALUE "ProductVersion", "%(PRODUCT_VERSION)\0"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   570
      VALUE "ProductDate", "%(PRODUCT_DATE)\0"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   571
    END
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   572
  END
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   573
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   574
  BLOCK "VarFileInfo"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   575
  BEGIN                               //  Language   |    Translation
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   576
    VALUE "Translation", 0x409, 0x4E4 // U.S. English, Windows Multilingual
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   577
  END
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   578
END
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   579
'
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   580
    "
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   581
     stx_libbasic3 packageName_dot_rc
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   582
     stx_libbasic3 generate_packageName_dot_rc
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   583
    "
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   584
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   585
    "Modified: / 09-08-2006 / 15:10:57 / fm"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   586
    "Created: / 30-08-2006 / 18:41:47 / cg"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   587
!
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   588
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   589
preRequisiteLine_nt_dot_mak
c897f2e72672 initial checkin
fm
parents:
diff changeset
   590
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   591
^'%(FILE_NAME).dll: $(TOP)\%(MODULE_DIRECTORY)\objbc\%(FILE_NAME).dll
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   592
        copy $(TOP)\%(MODULE_DIRECTORY)\objbc\%(FILE_NAME).dll *.*
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   593
'
c897f2e72672 initial checkin
fm
parents:
diff changeset
   594
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   595
c897f2e72672 initial checkin
fm
parents:
diff changeset
   596
subProjectLine_nt_dot_mak
c897f2e72672 initial checkin
fm
parents:
diff changeset
   597
c897f2e72672 initial checkin
fm
parents:
diff changeset
   598
^'%(LIBRARY_NAME).dll: $(TOP)\..\%(PATH_TO_SUB_PROJECT)\objbc\%(LIBRARY_NAME).dll
c897f2e72672 initial checkin
fm
parents:
diff changeset
   599
        copy $(TOP)\..\%(PATH_TO_SUB_PROJECT)\objbc\%(LIBRARY_NAME).dll *.*
c897f2e72672 initial checkin
fm
parents:
diff changeset
   600
c897f2e72672 initial checkin
fm
parents:
diff changeset
   601
$(TOP)\..\%(PATH_TO_SUB_PROJECT)\objbc\%(LIBRARY_NAME).dll:
c897f2e72672 initial checkin
fm
parents:
diff changeset
   602
        cd $(TOP)\..\%(PATH_TO_SUB_PROJECT)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   603
        bmake
c897f2e72672 initial checkin
fm
parents:
diff changeset
   604
        -cd $(TOP)\..\%(PATH_TO_MYPROJECT)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   605
'
c897f2e72672 initial checkin
fm
parents:
diff changeset
   606
! !
c897f2e72672 initial checkin
fm
parents:
diff changeset
   607
c897f2e72672 initial checkin
fm
parents:
diff changeset
   608
!ApplicationDefinition class methodsFor:'mappings'!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   609
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   610
buildDate_dot_h_mappings
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   611
    |d|
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   612
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   613
    d := Dictionary new.
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   614
    d 
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   615
        at: 'BUILDDATE' put: (Timestamp now printStringRFC1123Format ). 
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   616
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   617
    ^ d
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   618
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   619
    "Created: / 30-08-2006 / 19:19:30 / cg"
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   620
    "Modified: / 14-09-2006 / 18:58:31 / cg"
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   621
!
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   622
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   623
modules_dot_stx_mappings
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   624
    |d|
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   625
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   626
    d := Dictionary new.
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   627
    d 
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   628
        at: 'PREREQUISITE_LIBS' put: (self generatePreRequisiteLibs_modules_dot_stx); 
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   629
        at: 'SUBPROJECT_LIBS' put: (self generateSubProjectLines_modules_dot_stx  ). 
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   630
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   631
    ^ d
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   632
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   633
    "Modified: / 14-09-2006 / 18:58:41 / cg"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   634
!
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   635
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   636
nt_dot_mak_mappings
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   637
    |d|
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   638
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   639
    d := super nt_dot_mak_mappings.
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   640
    d 
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   641
        at: 'LOCAL_INCLUDES' put: (self generateLocalIncludes_win32);
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   642
        at: 'APPLICATION' put: (self applicationName);
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   643
        at: 'RESFILENAME' put: (self resourceFilename );
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   644
        at: 'RCFILENAME' put: (self rcFilename );
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   645
        at: 'STARTUP_CLASS' put: ( self startupClassName );
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   646
        at: 'STARTUP_SELECTOR' put: (self startupSelector );
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   647
        at: 'REQUIRED_LIBS' put: (self generateRequiredLibs_nt_dot_mak); 
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   648
        at: 'PREREQUISITES_LIBS' put: (self generatePreRequisiteLines_nt_dot_mak );  
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   649
        at: 'DEPENDENCIES' put: (self generateDependencies_win32);
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   650
        at: 'SUBPROJECTS_LIBS' put: (self generateSubProjectLines_nt_dot_mak ). 
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   651
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   652
    self needResources ifTrue:[
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   653
        d 
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   654
            at: 'REQUIRED_SUPPORT_DIRS' put: 'RESOURCEFILES'.
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   655
        d
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   656
            at: 'RESOURCE_RULES' put:( self replaceMappings: d 
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   657
                                            in: self nt_dot_mak_resource_rules ).
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   658
    ].
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   659
    ^ d
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   660
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   661
    "Modified: / 14-09-2006 / 18:58:52 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   662
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   663
c897f2e72672 initial checkin
fm
parents:
diff changeset
   664
preRequisiteLine_nt_dot_mak_mappings: aProjectID 
c897f2e72672 initial checkin
fm
parents:
diff changeset
   665
c897f2e72672 initial checkin
fm
parents:
diff changeset
   666
^Dictionary new
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   667
    at: 'FILE_NAME' put: (self libraryNameFor: aProjectID );  
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   668
    at: 'MODULE_DIRECTORY' put: ( (PackageId from:aProjectID) directory copy replaceAll:$/ with:$\ );     
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   669
    yourself
9567
dff3e4bd9de2 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9557
diff changeset
   670
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   671
    "Modified: / 14-09-2006 / 18:59:09 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   672
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   673
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   674
preRequisiteLine_nt_dot_mak_mappingsForClass:aClass
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   675
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   676
^Dictionary new
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   677
    at: 'FILE_NAME' put: ( aClass classFilename asFilename withoutSuffix baseName );  
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   678
    at: 'MODULE_DIRECTORY' put: ( (PackageId from:aClass package) directory copy replaceAll:$/ with:$\ );     
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   679
    yourself
9567
dff3e4bd9de2 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9557
diff changeset
   680
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   681
    "Modified: / 14-09-2006 / 18:59:19 / cg"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   682
!
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   683
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   684
subProjectLine_nt_dot_mak_mappings: aProjectID 
9557
c21987d744bf code cleanup
Claus Gittinger <cg@exept.de>
parents: 9552
diff changeset
   685
    ^ Dictionary new
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   686
        at: 'LIBRARY_NAME' put: (self libraryNameFor: aProjectID );     
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   687
        at: 'PATH_TO_SUB_PROJECT' put: ( (PackageId from:aProjectID) module,'\',(PackageId from:aProjectID) directory copy replaceAll:$/ with:$\ ); 
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   688
        at: 'PATH_TO_MYPROJECT' put: (self msdosPathToPackage: self package from: aProjectID); 
9557
c21987d744bf code cleanup
Claus Gittinger <cg@exept.de>
parents: 9552
diff changeset
   689
        yourself
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   690
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   691
    "Modified: / 14-09-2006 / 18:59:26 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   692
! !
c897f2e72672 initial checkin
fm
parents:
diff changeset
   693
c897f2e72672 initial checkin
fm
parents:
diff changeset
   694
!ApplicationDefinition class methodsFor:'mappings support'!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   695
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   696
generatePreRequisiteLibs_modules_dot_stx
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   697
    ^ String streamContents:[:s |
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   698
        self preRequisites do:[:projectID | 
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   699
            s nextPutLine:(self libraryNameFor:projectID)
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   700
        ].
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   701
        self isGUIApplication ifTrue:[
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
   702
            self guiClassFileNames_win32 do:[:eachFilename |
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   703
                s nextPutLine:(eachFilename asFilename withoutSuffix baseName)
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   704
            ].
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   705
        ].
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   706
    ].
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   707
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   708
    "
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   709
     bosch_dapasx_application generatePreRequisiteLibs_modules_dot_stx
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   710
    "
9567
dff3e4bd9de2 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9557
diff changeset
   711
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
   712
    "Modified: / 07-09-2006 / 17:22:58 / cg"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   713
!
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   714
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   715
generatePreRequisiteLines_nt_dot_mak         
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   716
c897f2e72672 initial checkin
fm
parents:
diff changeset
   717
    ^ String streamContents:[:s |
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   718
        self preRequisites do:[:eachPackage |
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   719
            |mappings newObjectLine|
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   720
            mappings := self preRequisiteLine_nt_dot_mak_mappings: eachPackage.
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   721
            newObjectLine := self replaceMappings: mappings
c897f2e72672 initial checkin
fm
parents:
diff changeset
   722
                                in: self preRequisiteLine_nt_dot_mak.
c897f2e72672 initial checkin
fm
parents:
diff changeset
   723
            s nextPutAll:newObjectLine. 
c897f2e72672 initial checkin
fm
parents:
diff changeset
   724
            s cr. 
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   725
        ].
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
   726
        self guiClasses_win32 do:[:eachClass |
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   727
            |mappings newObjectLine|
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   728
            mappings := self preRequisiteLine_nt_dot_mak_mappingsForClass: eachClass.
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   729
            newObjectLine := self replaceMappings: mappings
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   730
                                in: self preRequisiteLine_nt_dot_mak.
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   731
            s nextPutAll:newObjectLine. 
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   732
            s cr. 
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   733
        ].
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   734
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   735
    ]
c897f2e72672 initial checkin
fm
parents:
diff changeset
   736
"
c897f2e72672 initial checkin
fm
parents:
diff changeset
   737
    bosch_dapasx_Application generatePreRequisiteLines_make_dot_spec 
c897f2e72672 initial checkin
fm
parents:
diff changeset
   738
c897f2e72672 initial checkin
fm
parents:
diff changeset
   739
"
c897f2e72672 initial checkin
fm
parents:
diff changeset
   740
c897f2e72672 initial checkin
fm
parents:
diff changeset
   741
    "Created: / 09-08-2006 / 11:24:39 / fm"
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
   742
    "Modified: / 07-09-2006 / 17:21:45 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   743
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   744
c897f2e72672 initial checkin
fm
parents:
diff changeset
   745
generateRequiredLibs_nt_dot_mak
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   746
    ^ String streamContents:[:s |
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   747
        s nextPutLine:' \'.
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   748
        self preRequisites do:[:projectID | 
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   749
            s space; nextPutAll:(self libraryNameFor:projectID),'.dll'; nextPutLine:' \'.
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   750
        ].
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   751
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   752
        self isGUIApplication ifTrue:[
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
   753
            self guiClassFileNames_win32 do:[:eachFilename |
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   754
                s space; nextPutAll:eachFilename; nextPutLine:' \'.
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   755
            ].
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   756
        ].
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   757
        self subProjects do:[:projectID | 
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   758
            s space; nextPutAll:(self libraryNameFor:projectID),'.dll'; nextPutLine:' \'.
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   759
        ].
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   760
        s cr.
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   761
    ].
c897f2e72672 initial checkin
fm
parents:
diff changeset
   762
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   763
    "
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   764
     bosch_dapasx_application generateRequiredLibs_nt_dot_mak      
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   765
    "
9567
dff3e4bd9de2 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9557
diff changeset
   766
9833
60fba527f5b0 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9830
diff changeset
   767
    "Modified: / 07-09-2006 / 17:22:51 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   768
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   769
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   770
generateSubProjectLines_modules_dot_stx
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   771
    |string|
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   772
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   773
    string := String streamContents:[:s |
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   774
            self subProjects do:[:projectID | 
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   775
                    s nextPutLine:(self libraryNameFor:projectID)
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   776
                ].
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   777
            ].
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   778
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   779
    ^ string
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   780
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   781
    "
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   782
     bosch_dapasx_application generateSubProjectLines_modules_dot_stx
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   783
    "
9567
dff3e4bd9de2 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9557
diff changeset
   784
dff3e4bd9de2 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9557
diff changeset
   785
    "Modified: / 17-08-2006 / 17:22:37 / cg"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   786
!
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   787
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   788
generateSubProjectLines_nt_dot_mak         
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   789
c897f2e72672 initial checkin
fm
parents:
diff changeset
   790
    ^ String streamContents:[:s |
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   791
        self subProjects do:[:projectID |
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   792
            |mappings newObjectLine|
9687
6df06c7a8789 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9686
diff changeset
   793
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   794
            mappings := self subProjectLine_nt_dot_mak_mappings: projectID.
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   795
            newObjectLine := self replaceMappings: mappings
c897f2e72672 initial checkin
fm
parents:
diff changeset
   796
                                in: self subProjectLine_nt_dot_mak.
c897f2e72672 initial checkin
fm
parents:
diff changeset
   797
            s nextPutAll:newObjectLine. 
c897f2e72672 initial checkin
fm
parents:
diff changeset
   798
            s cr. 
c897f2e72672 initial checkin
fm
parents:
diff changeset
   799
        ]
c897f2e72672 initial checkin
fm
parents:
diff changeset
   800
    ]
c897f2e72672 initial checkin
fm
parents:
diff changeset
   801
"
9535
ce5e1b8a240d *** empty log message ***
fm
parents: 9532
diff changeset
   802
    bosch_dapasx_application generateSubProjectLinesnt_dot_mak 
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   803
c897f2e72672 initial checkin
fm
parents:
diff changeset
   804
"
c897f2e72672 initial checkin
fm
parents:
diff changeset
   805
c897f2e72672 initial checkin
fm
parents:
diff changeset
   806
    "Created: / 09-08-2006 / 11:24:39 / fm"
9886
6574a17ca51e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9854
diff changeset
   807
    "Modified: / 14-09-2006 / 18:46:09 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   808
! !
c897f2e72672 initial checkin
fm
parents:
diff changeset
   809
9587
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   810
!ApplicationDefinition class methodsFor:'private'!
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   811
9684
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   812
addReferencesToClassesFromGlobalsIn:aSetOfClasses to:usedClassReasons
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   813
    aSetOfClasses
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   814
        do:[:aClass |
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   815
            aClass methodsDo:[:method | 
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   816
                method usedGlobals 
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   817
                    do:[:global | |usedClass|        
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   818
                        usedClass := Smalltalk at: global asSymbol. 
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   819
                        (usedClass notNil and:[usedClass isClass and:[usedClass isNameSpace not]]) 
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   820
                            ifTrue:[
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   821
                                (usedClassReasons at: usedClass ifAbsentPut:[Set new])
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   822
                                    add: (usedClass name, ' - Referenced by ', aClass name,'>>',method name)
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   823
                            ]
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   824
                    ]
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   825
            ]
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   826
        ].
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   827
!
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   828
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   829
searchForPreRequisites
9684
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   830
    |includedClasses requiredPackageReasons usedClassReasons allSubProjects|
9669
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   831
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   832
    requiredPackageReasons := Dictionary new.
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   833
    usedClassReasons := Dictionary new.
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   834
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   835
    includedClasses := Set with:self.
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   836
    self subProjects do:[:projectID | 
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   837
        includedClasses addAll: (self searchForClassesWithProject: projectID asSymbol)
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   838
    ].
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   839
9684
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   840
    "/ only search for locals referred to by my methods (assuming that superclasses'
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   841
    "/ requisites are specifief in their package.
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   842
    self addReferencesToClassesFromGlobalsIn:includedClasses to:usedClassReasons.
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   843
9669
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   844
    includedClasses do:[:cls | 
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   845
        cls allSuperclassesDo:[:superClass |    
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   846
            (usedClassReasons at: superClass ifAbsentPut:[Set new])
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   847
                add: (superClass name, ' - Superclass of ', cls name).
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   848
        ]
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   849
    ].
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   850
    includedClasses addAll: (usedClassReasons keys).
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   851
9684
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   852
    allSubProjects := 
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   853
        (self siblingsAreSubProjects)
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   854
            ifTrue:[ self searchForSiblingProjects ]
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
   855
            ifFalse:[ self searchForSubProjects ].
9669
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   856
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   857
    usedClassReasons 
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   858
        keysAndValuesDo:[:usedClass :reasonsPerClass |           
c897f2e72672 initial checkin
fm
parents:
diff changeset
   859
                (allSubProjects includes: usedClass package asString)
c897f2e72672 initial checkin
fm
parents:
diff changeset
   860
                        ifFalse:[
c897f2e72672 initial checkin
fm
parents:
diff changeset
   861
                                usedClass package == Project noProjectID 
9669
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   862
                                        ifFalse:[(requiredPackageReasons at:usedClass package ifAbsentPut:[Set new])
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   863
                                                    addAll:reasonsPerClass.] 
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   864
                        ].
c897f2e72672 initial checkin
fm
parents:
diff changeset
   865
        ].
c897f2e72672 initial checkin
fm
parents:
diff changeset
   866
9669
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   867
    Transcript showCR:requiredPackageReasons.
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   868
    ^requiredPackageReasons
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   869
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   870
    "
9669
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   871
     self searchForPreRequisites
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   872
     bosch_dapasx_Application searchForPreRequisites
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   873
     cg_testproject1 searchForPreRequisites
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
   874
    "
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   875
c897f2e72672 initial checkin
fm
parents:
diff changeset
   876
    "Created: / 07-08-2006 / 20:42:39 / fm"
c897f2e72672 initial checkin
fm
parents:
diff changeset
   877
    "Modified: / 07-08-2006 / 21:56:25 / fm"
9669
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   878
    "Modified: / 23-08-2006 / 15:38:27 / cg"
9587
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   879
! !
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   880
9813
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   881
!ApplicationDefinition class methodsFor:'queries'!
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   882
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   883
canHaveExtensions
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   884
    "return true, if this class allows extensions from other packages.
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   885
     Private classes, namespaces and projectDefinitions dont allow this"
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   886
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   887
    ^ self == ApplicationDefinition
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   888
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   889
    "
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   890
     Smalltalk allClasses select:[:each | each canHaveExtensions not]
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   891
    "
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   892
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   893
    "Created: / 30-08-2006 / 15:29:49 / cg"
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   894
! !
50b986cea25b *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9798
diff changeset
   895
9725
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   896
!ApplicationDefinition class methodsFor:'sanity checks'!
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   897
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   898
validateDescription
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   899
    #(
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   900
        startupClassName
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   901
"/        startupSelector
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   902
    ) do:[:sel |
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   903
        (self theMetaclass implements:sel) ifFalse:[
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   904
            Dialog 
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   905
                warn:('The %1-method is missing from the description %2!!' 
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   906
                        bindWith:sel allBold
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   907
                        with:self name allBold).
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   908
            AbortSignal raise.
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   909
        ].
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   910
        (Error catch:[ self perform:sel ]) ifTrue:[
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   911
            Dialog 
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   912
                warn:('The %1-method needs to be edited in the description %2!!' 
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   913
                        bindWith:sel allBold
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   914
                        with:self name allBold).
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   915
            AbortSignal raise.
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   916
        ].
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   917
    ].
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   918
! !
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   919
9587
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   920
!ApplicationDefinition class methodsFor:'testing'!
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   921
9669
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   922
isApplicationDefinition
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   923
    ^ self ~~ ApplicationDefinition
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   924
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   925
    "Created: / 23-08-2006 / 15:17:38 / cg"
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   926
!
f0b5ad4fb4a8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9623
diff changeset
   927
9587
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   928
isProjectDefinition
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   929
    ^ self ~~ ApplicationDefinition
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   930
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   931
    "Created: / 17-08-2006 / 14:11:56 / cg"
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   932
! !
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   933
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   934
!ApplicationDefinition class methodsFor:'update description'!
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   935
9798
ba30d25d5916 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9743
diff changeset
   936
forEachMethodsCodeToCompileDo:aTwoArgBlock ignoreOldDefinition:ignoreOldDefinition
ba30d25d5916 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9743
diff changeset
   937
    super forEachMethodsCodeToCompileDo:aTwoArgBlock ignoreOldDefinition:ignoreOldDefinition.
9587
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   938
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   939
    aTwoArgBlock 
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   940
        value:self subProjects_code
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   941
        value:'description'.
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   942
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   943
    aTwoArgBlock 
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   944
        value:self preRequisites_code
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   945
        value:'description'.
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   946
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   947
    (self class implements:#startupClassName) ifFalse:[
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   948
        aTwoArgBlock 
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   949
            value:self startupClassName_code
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   950
            value:'description - startup'.
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   951
    ].
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   952
    (self class implements:#startupSelector) ifFalse:[
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   953
        aTwoArgBlock 
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   954
            value:self startupSelector_code
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   955
            value:'description - startup'.
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   956
    ].
9725
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   957
9587
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   958
    "Created: / 10-08-2006 / 16:35:47 / cg"
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
   959
    "Modified: / 30-08-2006 / 19:03:48 / cg"
9587
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   960
!
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   961
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   962
preRequisites_code
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   963
    |preRequisites|
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   964
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   965
    preRequisites := self preRequisites asSet.
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   966
    preRequisites addAll: self searchForPreRequisites keys.
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   967
    preRequisites removeAll: self excludedFromPreRequisites.
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   968
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   969
    ^ String streamContents:[:s |
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   970
        s nextPutLine:'preRequisites'.
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   971
        s nextPutLine:'    ^ #('.
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   972
        preRequisites do:[:eachPackageID |    
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   973
            s nextPutLine:eachPackageID asString storeString
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   974
        ].      
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   975
        s nextPutLine:')'
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   976
    ].
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   977
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   978
"
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   979
    bosch_dapasx_Application preRequisites_code
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   980
"
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   981
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   982
    "Modified: / 08-08-2006 / 19:24:34 / fm"
172d616e9d8d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9578
diff changeset
   983
    "Created: / 17-08-2006 / 21:28:09 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
   984
!
c897f2e72672 initial checkin
fm
parents:
diff changeset
   985
9725
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   986
startupClassName_code
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   987
    ^ 
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   988
'startupClassName
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   989
    self error:''undefined startupClass''.
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   990
    ^ ''<name of class here>''
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   991
'
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   992
!
6aafcea3655c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9687
diff changeset
   993
9823
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   994
startupClassName_codeFor:aClassName
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   995
    ^ 
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   996
'startupClassName
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   997
    ^ ''',aClassName,'''
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   998
'
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
   999
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1000
    "Created: / 05-09-2006 / 13:40:32 / cg"
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1001
!
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1002
9816
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1003
startupSelector_code
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1004
    ^ 
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1005
'startupSelector
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1006
    self error:''undefined startupSelector''.
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1007
    ^ #''start'' "startupSelector here"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1008
'
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1009
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1010
    "Created: / 30-08-2006 / 19:02:50 / cg"
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1011
!
7a6c28ca9edc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9813
diff changeset
  1012
9823
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1013
startupSelector_codeFor:aSelector
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1014
    ^ 
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1015
'startupSelector
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1016
    ^ #''',aSelector,''' 
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1017
'
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1018
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1019
    "Created: / 05-09-2006 / 13:41:01 / cg"
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1020
!
fb8bc237f370 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9816
diff changeset
  1021
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1022
subProjects_code        
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1023
    |subProjects|
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1024
9684
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
  1025
    subProjects := 
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
  1026
        (self siblingsAreSubProjects)
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
  1027
            ifTrue:[ self searchForSiblingProjects ]
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
  1028
            ifFalse:[ self searchForSubProjects ].
23bc62e80fca *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9671
diff changeset
  1029
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1030
    subProjects removeAll: self excludedFromSubProjects.
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1031
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1032
    ^ String streamContents:[:s |
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1033
        s nextPutLine:'subProjects'.
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1034
        s nextPutLine:'    ^ #('.
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1035
        subProjects do:[:eachPackageID |    
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1036
            s nextPutLine:eachPackageID asString storeString
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1037
        ].      
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1038
        s nextPutLine:')'
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1039
    ].
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1040
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1041
    "
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1042
     bosch_dapasx subProjectsGeneratedString
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1043
     stx_goodies subProjectsGeneratedString
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1044
    "
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1045
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1046
    "Modified: / 08-08-2006 / 19:24:34 / fm"
9578
6e1a64b3cda8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9567
diff changeset
  1047
    "Created: / 17-08-2006 / 21:26:51 / cg"
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1048
! !
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1049
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1050
!ApplicationDefinition class methodsFor:'documentation'!
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1051
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1052
version
9890
047b99b0334a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 9889
diff changeset
  1053
    ^ '$Header: /cvs/stx/stx/libbasic/ApplicationDefinition.st,v 1.30 2006-09-14 18:28:06 cg Exp $'
9532
c897f2e72672 initial checkin
fm
parents:
diff changeset
  1054
! !