ApplicationDefinition.st
branchjv
changeset 19478 1f5aa87f6170
parent 19302 68355697fc84
parent 19474 c075c14786c0
child 19496 7613c0fb5f3c
equal deleted inserted replaced
19477:af82888ceb72 19478:1f5aa87f6170
    98 !ApplicationDefinition class methodsFor:'accessing'!
    98 !ApplicationDefinition class methodsFor:'accessing'!
    99 
    99 
   100 appSourcesProjects
   100 appSourcesProjects
   101     "Returns only the application projects (which are included in the application module)"
   101     "Returns only the application projects (which are included in the application module)"
   102 
   102 
   103     ^ self effectivePreRequisites select:[:each | 
   103     ^ self effectivePreRequisites 
   104         (self moduleFor: each) = self module
   104         select:[:each | 
   105     ].
   105             (self moduleFor: each) = self module
   106 
   106         ].
   107     "
   107 
   108         bosch_dapasx_application appSourcesProjects
   108     "
       
   109      bosch_dapasx_application appSourcesProjects
   109     "
   110     "
   110 !
   111 !
   111 
   112 
   112 startupClass
   113 startupClass
   113     "the class, but onlz of loaded"
   114     "the class, but onlz of loaded"
  1631      exept_expecco_application generateSubProjectLibs_make_dot_proto      
  1632      exept_expecco_application generateSubProjectLibs_make_dot_proto      
  1632     "
  1633     "
  1633 !
  1634 !
  1634 
  1635 
  1635 generateSubProjectLines_bc_dot_mak         
  1636 generateSubProjectLines_bc_dot_mak         
  1636 
       
  1637     ^ String streamContents:[:s |
  1637     ^ String streamContents:[:s |
  1638         self effectiveSubProjects do:[:projectID |
  1638         self effectiveSubProjects do:[:projectID |
  1639             |mappings newObjectLine|
  1639             |mappings newObjectLine|
  1640 
  1640 
  1641             mappings := self subProjectLine_bc_dot_mak_mappings: projectID.
  1641             mappings := self subProjectLine_bc_dot_mak_mappings: projectID.
  1676     "Created: / 09-08-2006 / 11:24:39 / fm"
  1676     "Created: / 09-08-2006 / 11:24:39 / fm"
  1677     "Modified: / 14-09-2006 / 18:46:09 / cg"
  1677     "Modified: / 14-09-2006 / 18:46:09 / cg"
  1678 !
  1678 !
  1679 
  1679 
  1680 generateSubProjectLines_modules_dot_stx
  1680 generateSubProjectLines_modules_dot_stx
  1681     |string|
  1681     ^ String streamContents:[:s |
  1682 
       
  1683     string := String streamContents:[:s |
       
  1684         self effectiveSubProjects do:[:projectID |
  1682         self effectiveSubProjects do:[:projectID |
  1685                     (self shouldBeLoadedInitially:projectID) ifFalse:[
  1683             (self shouldBeLoadedInitially:projectID) ifFalse:[
  1686                         s nextPut:$*.
  1684                 s nextPut:$*.
  1687                     ].
       
  1688                     s nextPutLine:(self libraryNameFor:projectID).
       
  1689                 ].
       
  1690             ].
  1685             ].
  1691 
  1686             s nextPutLine:(self libraryNameFor:projectID).
  1692     ^ string
  1687         ].
       
  1688     ].
  1693 
  1689 
  1694     "
  1690     "
  1695      exept_expecco_application generateSubProjectLines_modules_dot_stx
  1691      exept_expecco_application generateSubProjectLines_modules_dot_stx
  1696      cg_newCompiler_driver_stc generateSubProjectLines_modules_dot_stx
  1692      cg_newCompiler_driver_stc generateSubProjectLines_modules_dot_stx
  1697     "
  1693     "
  3095      exept_expecco_application definitionClassOfApplicationBundle    
  3091      exept_expecco_application definitionClassOfApplicationBundle    
  3096      exept_expecco_plugin_swt definitionClassOfApplicationBundle    
  3092      exept_expecco_plugin_swt definitionClassOfApplicationBundle    
  3097     "
  3093     "
  3098 !
  3094 !
  3099 
  3095 
       
  3096 isAbstract
       
  3097     ^ self == ApplicationDefinition
       
  3098 !
       
  3099 
  3100 projectType
  3100 projectType
  3101     ^ self isGUIApplication
  3101     ^ self isGUIApplication
  3102         ifTrue:[ GUIApplicationType  ]
  3102         ifTrue:[ GUIApplicationType  ]
  3103         ifFalse:[ NonGUIApplicationType ]
  3103         ifFalse:[ NonGUIApplicationType ]
  3104 !
  3104 !
  3150     "Modified (comment): / 31-10-2011 / 10:58:03 / cg"
  3150     "Modified (comment): / 31-10-2011 / 10:58:03 / cg"
  3151 ! !
  3151 ! !
  3152 
  3152 
  3153 !ApplicationDefinition class methodsFor:'testing'!
  3153 !ApplicationDefinition class methodsFor:'testing'!
  3154 
  3154 
  3155 isAbstract
       
  3156     ^ self == ApplicationDefinition
       
  3157 !
       
  3158 
       
  3159 isApplicationDefinition
  3155 isApplicationDefinition
  3160     ^ self isAbstract not
  3156     ^ self isAbstract not
  3161 
  3157 
  3162     "Created: / 23-08-2006 / 15:17:38 / cg"
  3158     "Created: / 23-08-2006 / 15:17:38 / cg"
  3163 ! !
  3159 ! !