ProjectDefinition.st
changeset 9685 e6a533e0a5e5
parent 9683 b41170a963f0
child 9688 aa6ccbfbd00b
equal deleted inserted replaced
9684:23bc62e80fca 9685:e6a533e0a5e5
   422 
   422 
   423     "/ intentionally left blank
   423     "/ intentionally left blank
   424 
   424 
   425     "Created: / 08-08-2006 / 11:07:40 / fm"
   425     "Created: / 08-08-2006 / 11:07:40 / fm"
   426     "Modified: / 17-08-2006 / 19:59:26 / cg"
   426     "Modified: / 17-08-2006 / 19:59:26 / cg"
       
   427 !
       
   428 
       
   429 siblingsAreSubProjects
       
   430     ^ false
   427 !
   431 !
   428 
   432 
   429 subProjects
   433 subProjects
   430     "list packages which are known as subprojects. This method is generated automatically.
   434     "list packages which are known as subprojects. This method is generated automatically.
   431      However, when generating automatically, packages are only added - never removed, unless listed
   435      However, when generating automatically, packages are only added - never removed, unless listed
  1368         ]
  1372         ]
  1369 
  1373 
  1370     "Created: / 23-08-2006 / 14:36:53 / cg"
  1374     "Created: / 23-08-2006 / 14:36:53 / cg"
  1371 !
  1375 !
  1372 
  1376 
  1373 compileDescriptionMethods
       
  1374     Class packageQuerySignal 
       
  1375         answer:self package
       
  1376         do:[
       
  1377             self 
       
  1378                 forEachMethodsCodeToCompileDo:[:code :category |
       
  1379                     self compile:code categorized:category
       
  1380                 ].
       
  1381             self instAndClassMethodsDo:[:m | m package:self package].
       
  1382         ].
       
  1383 
       
  1384     "
       
  1385      DapasXProject compileDescriptionMethods
       
  1386      DapasX_Datenbasis compileDescriptionMethods
       
  1387      bosch_dapasx_interactiver_editor compileDescriptionMethods
       
  1388      stx_libbasic compileDescriptionMethods
       
  1389     "
       
  1390 
       
  1391     "Created: / 09-08-2006 / 18:00:31 / fm"
       
  1392     "Modified: / 23-08-2006 / 14:38:03 / cg"
       
  1393 !
       
  1394 
       
  1395 compiled_classes
  1377 compiled_classes
  1396     ^ self compiled_classNames collect:[:eachName| (Smalltalk at:eachName asSymbol)]
  1378     ^ self compiled_classNames collect:[:eachName| (Smalltalk at:eachName asSymbol)]
  1397 
  1379 
  1398     "Created: / 09-08-2006 / 16:28:15 / fm"
  1380     "Created: / 09-08-2006 / 16:28:15 / fm"
  1399     "Modified: / 09-08-2006 / 18:02:28 / fm"
  1381     "Modified: / 09-08-2006 / 18:02:28 / fm"
  1761     "
  1743     "
  1762 
  1744 
  1763     "Created: / 18-08-2006 / 16:20:42 / cg"
  1745     "Created: / 18-08-2006 / 16:20:42 / cg"
  1764 !
  1746 !
  1765 
  1747 
       
  1748 compileDescriptionMethods
       
  1749     (self isLibraryDefinition
       
  1750     or:[ self isApplicationDefinition ] ) ifFalse:[
       
  1751         self error:'I am abstract - must be a subclass of Libray- or ApplicationDefinition.'
       
  1752     ].
       
  1753 
       
  1754     Class packageQuerySignal 
       
  1755         answer:self package
       
  1756         do:[
       
  1757             self 
       
  1758                 forEachMethodsCodeToCompileDo:[:code :category |
       
  1759                     self compile:code categorized:category
       
  1760                 ].
       
  1761             self instAndClassMethodsDo:[:m | m package:self package].
       
  1762         ].
       
  1763 
       
  1764     "
       
  1765      DapasXProject compileDescriptionMethods
       
  1766      DapasX_Datenbasis compileDescriptionMethods
       
  1767      bosch_dapasx_interactiver_editor compileDescriptionMethods
       
  1768      stx_libbasic compileDescriptionMethods
       
  1769     "
       
  1770 
       
  1771     "Created: / 09-08-2006 / 18:00:31 / fm"
       
  1772     "Modified: / 23-08-2006 / 14:38:03 / cg"
       
  1773 !
       
  1774 
  1766 description_code
  1775 description_code
  1767     ^ String streamContents:[:s |
  1776     ^ String streamContents:[:s |
  1768         s nextPutLine:'description'.
  1777         s nextPutLine:'description'.
  1769         s nextPutLine:'    "Return a description string which will appear in nt.def / bc.def"'.
  1778         s nextPutLine:'    "Return a description string which will appear in nt.def / bc.def"'.
  1770         s cr; nextPutLine:'    ^ ',self description asString storeString.
  1779         s cr; nextPutLine:'    ^ ',self description asString storeString.
  1835 ! !
  1844 ! !
  1836 
  1845 
  1837 !ProjectDefinition class methodsFor:'documentation'!
  1846 !ProjectDefinition class methodsFor:'documentation'!
  1838 
  1847 
  1839 version
  1848 version
  1840     ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.39 2006-08-23 20:32:16 cg Exp $'
  1849     ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.40 2006-08-23 21:04:53 cg Exp $'
  1841 ! !
  1850 ! !