993 !LibraryBuilder methodsFor:'initialization'! |
993 !LibraryBuilder methodsFor:'initialization'! |
994 |
994 |
995 initialize |
995 initialize |
996 "initializes all aspects" |
996 "initializes all aspects" |
997 |
997 |
998 |homeDir myAspects| |
998 |topDir myAspects| |
999 |
999 |
1000 super initialize. |
1000 super initialize. |
1001 |
1001 |
1002 homeDir := Filename homeDirectory asFilename. |
1002 topDir := (Filename currentDirectory asFilename construct:'..') construct:'..'. |
1003 |
1003 |
1004 myAspects := IdentityDictionary new. |
1004 myAspects := IdentityDictionary new. |
1005 aspects associationsDo: [:aspect| myAspects at: aspect key put: aspect value copy]. |
1005 aspects associationsDo: [:aspect| myAspects at: aspect key put: aspect value copy]. |
1006 aspects := myAspects. |
1006 aspects := myAspects. |
1007 |
1007 |
1008 (aspects at: #systemLibrary) addDependent: self. |
1008 (aspects at: #systemLibrary) addDependent: self. |
1009 self aspectsAt: #libraryName putFirst: 'libnew'. |
1009 self aspectsAt: #libraryName putFirst: 'libnew'. |
1010 self aspectsAt: #libraryClasses putFirst: OrderedCollection new. |
1010 self aspectsAt: #libraryClasses putFirst: OrderedCollection new. |
1011 self getLibraryClasses. "do check classes" |
1011 self getLibraryClasses. "do check classes" |
1012 self aspectsAt: #libraryDefines putFirst: '-L/usr/X11/lib -Llib -Lbinary -L. -L/usr/local/lib -L/usr/lib -L/lib -lm -ldl -lXext -lX11'. |
1012 self aspectsAt: #libraryDefines putFirst: '-L/usr/X11/lib -Llib -Lbinary -L. -L/usr/local/lib -L/usr/lib -L/lib -lm -ldl -lXext -lX11'. |
1013 self aspectsAt: #targetDirectory putFirst: (homeDir construct: 'stx/libnew') name. |
1013 self aspectsAt: #targetDirectory putFirst: (topDir pathName asFilename construct: 'libnew') pathName. |
1014 self aspectsAt: #sourceDirectory putFirst: (homeDir construct: 'stx') name. |
1014 self aspectsAt: #sourceDirectory putFirst: topDir pathName. |
1015 |
1015 |
1016 self aspectsAt: #standardHeaderPath putFirst: '/rules/stdHeader'. |
1016 self aspectsAt: #standardHeaderPath putFirst: '/rules/stdHeader'. |
1017 self aspectsAt: #commonDefinesPath putFirst: '/configurations/COMMON/defines'. |
1017 self aspectsAt: #commonDefinesPath putFirst: '/configurations/COMMON/defines'. |
1018 self aspectsAt: #vendorCommonDefinesPath putFirst: '/configurations/vendorConf'. |
1018 self aspectsAt: #vendorCommonDefinesPath putFirst: '/configurations/vendorConf'. |
1019 self aspectsAt: #vendorCommonConfigurationDefinesPath putFirst: '/configurations/myConf'. |
1019 self aspectsAt: #vendorCommonConfigurationDefinesPath putFirst: '/configurations/myConf'. |