equal
deleted
inserted
replaced
13 selectedApplicationIndexHolder selectedApplication |
13 selectedApplicationIndexHolder selectedApplication |
14 hasApplicationSelectedHolder listOfStartupClassesInProject |
14 hasApplicationSelectedHolder listOfStartupClassesInProject |
15 selectedStartupClassIndexHolder selectedStartupClass |
15 selectedStartupClassIndexHolder selectedStartupClass |
16 hasStartupClassSelectedHolder selectedApplicationsComment |
16 hasStartupClassSelectedHolder selectedApplicationsComment |
17 buildDirectoryHolder makeProcess listOfClassesInProject |
17 buildDirectoryHolder makeProcess listOfClassesInProject |
18 makeOutputWindow projectBuilder newStartupClassName' |
18 makeOutputWindow projectBuilder newStartupClassName |
|
19 usedCompilerHolder' |
19 classVariableNames:'' |
20 classVariableNames:'' |
20 poolDictionaries:'' |
21 poolDictionaries:'' |
21 category:'System-Support-Projects' |
22 category:'System-Support-Projects' |
22 ! |
23 ! |
23 |
24 |
686 |
687 |
687 "Do not manually edit this!! If it is corrupted, |
688 "Do not manually edit this!! If it is corrupted, |
688 the UIPainter may not be able to read the specification." |
689 the UIPainter may not be able to read the specification." |
689 |
690 |
690 " |
691 " |
691 UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#page6_specifyBuildDirectorySpec |
692 UIPainter new openOnClass:Tools::ProjectBuilderAssistantApplication andSelector:#page6_specifyBuildDirectorySpec |
692 ProjectBuilderAssistantApplication new openInterface:#page6_specifyBuildDirectorySpec |
693 Tools::ProjectBuilderAssistantApplication new openInterface:#page6_specifyBuildDirectorySpec |
693 " |
694 " |
694 |
695 |
695 <resource: #canvas> |
696 <resource: #canvas> |
696 |
697 |
697 ^ |
698 ^ |
700 window: |
701 window: |
701 (WindowSpec |
702 (WindowSpec |
702 label: 'Project Selection' |
703 label: 'Project Selection' |
703 name: 'Project Selection' |
704 name: 'Project Selection' |
704 min: (Point 0 0) |
705 min: (Point 0 0) |
705 bounds: (Rectangle 0 0 521 104) |
706 bounds: (Rectangle 0 0 521 239) |
706 ) |
707 ) |
707 component: |
708 component: |
708 (SpecCollection |
709 (SpecCollection |
709 collection: ( |
710 collection: ( |
710 (FramedBoxSpec |
711 (FramedBoxSpec |
720 name: 'FilenameEntryField1' |
721 name: 'FilenameEntryField1' |
721 layout: (LayoutFrame 0 0.0 10 0 0 1.0 32 0) |
722 layout: (LayoutFrame 0 0.0 10 0 0 1.0 32 0) |
722 model: buildDirectoryHolder |
723 model: buildDirectoryHolder |
723 acceptOnPointerLeave: true |
724 acceptOnPointerLeave: true |
724 viewClassName: FilenameWidgetWithHistory |
725 viewClassName: FilenameWidgetWithHistory |
|
726 ) |
|
727 ) |
|
728 |
|
729 ) |
|
730 ) |
|
731 (FramedBoxSpec |
|
732 label: 'Compiler / Toolchain' |
|
733 name: 'FramedBox4' |
|
734 layout: (LayoutFrame 0 0.0 81 0 4 1.0 155 0) |
|
735 labelPosition: topLeft |
|
736 translateLabel: true |
|
737 component: |
|
738 (SpecCollection |
|
739 collection: ( |
|
740 (ComboListSpec |
|
741 name: 'ComboList1' |
|
742 layout: (LayoutFrame 0 0 10 0 137 0 32 0) |
|
743 model: usedCompilerHolder |
|
744 comboList: listOfPossibleCompilers |
|
745 useIndex: false |
725 ) |
746 ) |
726 ) |
747 ) |
727 |
748 |
728 ) |
749 ) |
729 ) |
750 ) |
1187 ]. |
1208 ]. |
1188 ex proceed. |
1209 ex proceed. |
1189 ] do:[ |
1210 ] do:[ |
1190 projectBuilder := ProjectBuilder new. |
1211 projectBuilder := ProjectBuilder new. |
1191 projectBuilder package:(selectedProjectDefinition package). |
1212 projectBuilder package:(selectedProjectDefinition package). |
|
1213 projectBuilder usedCompiler:(usedCompilerHolder value). |
1192 what = 'exe' ifTrue:[ |
1214 what = 'exe' ifTrue:[ |
1193 projectBuilder makeExeOnly:true |
1215 projectBuilder makeExeOnly:true |
1194 ] ifFalse:[ |
1216 ] ifFalse:[ |
1195 projectBuilder makeExeOnly:false |
1217 projectBuilder makeExeOnly:false |
1196 ]. |
1218 ]. |
1374 |
1396 |
1375 listOfMatchingProjects isNil ifTrue:[ |
1397 listOfMatchingProjects isNil ifTrue:[ |
1376 listOfMatchingProjects := ValueHolder new. |
1398 listOfMatchingProjects := ValueHolder new. |
1377 ]. |
1399 ]. |
1378 ^ listOfMatchingProjects. |
1400 ^ listOfMatchingProjects. |
|
1401 ! |
|
1402 |
|
1403 listOfPossibleCompilers |
|
1404 OperatingSystem isMSWINDOWSlike ifTrue:[ |
|
1405 ^ #('bcc' 'vc' 'lcc') |
|
1406 ]. |
|
1407 ^ #('gcc') |
1379 ! |
1408 ! |
1380 |
1409 |
1381 listOfStartupClassesInProject |
1410 listOfStartupClassesInProject |
1382 <resource: #uiAspect> |
1411 <resource: #uiAspect> |
1383 |
1412 |
1558 |
1587 |
1559 stopMakeButtonVisible isNil ifTrue:[ |
1588 stopMakeButtonVisible isNil ifTrue:[ |
1560 stopMakeButtonVisible := false asValue. |
1589 stopMakeButtonVisible := false asValue. |
1561 ]. |
1590 ]. |
1562 ^ stopMakeButtonVisible. |
1591 ^ stopMakeButtonVisible. |
|
1592 ! |
|
1593 |
|
1594 usedCompilerHolder |
|
1595 <resource: #uiAspect> |
|
1596 |
|
1597 usedCompilerHolder isNil ifTrue:[ |
|
1598 usedCompilerHolder := ValueHolder new. |
|
1599 usedCompilerHolder value:(OperatingSystem isMSWINDOWSlike ifTrue:['bcc'] ifFalse:['gcc']) |
|
1600 ]. |
|
1601 ^ usedCompilerHolder. |
1563 ! ! |
1602 ! ! |
1564 |
1603 |
1565 !ProjectBuilderAssistantApplication methodsFor:'initialization & release'! |
1604 !ProjectBuilderAssistantApplication methodsFor:'initialization & release'! |
1566 |
1605 |
1567 postBuildMakeOutputWindow:aView |
1606 postBuildMakeOutputWindow:aView |