AbstractSettingsApplication.st
changeset 14307 8198db379b53
parent 14278 bf34a3f16877
child 14320 d559509527ed
equal deleted inserted replaced
14306:9dfa3f159bd3 14307:8198db379b53
  1069 
  1069 
  1070 #allowAssignmentToPoolVariable
  1070 #allowAssignmentToPoolVariable
  1071 'Pool variables should only be initialized in the pool itself and not modified elsewhere later.\This flag makes pool varaiables writable.\May be required to fileIn code from Squeak and other Smalltalk dialects'
  1071 'Pool variables should only be initialized in the pool itself and not modified elsewhere later.\This flag makes pool varaiables writable.\May be required to fileIn code from Squeak and other Smalltalk dialects'
  1072 
  1072 
  1073 #allowDollarInIdentifier
  1073 #allowDollarInIdentifier
  1074 'Check this to allow dollar character in identifiers. This may be required to filein old code for VAX Smalltalk'
  1074 'Check this to allow dollar character in identifiers.\This may be required to filein old code for VAX Smalltalk,\but is not compatible to most other Smalltalk dialects.'
  1075 
  1075 
  1076 #allowDolphinExtensions
  1076 #allowDolphinExtensions
  1077 'Allow Dolphin-Smalltalk specific syntax extensions'
  1077 'Allow Dolphin-Smalltalk specific syntax extensions'
  1078 
  1078 
  1079 #allowEmptyStatements
  1079 #allowEmptyStatements
  1081 
  1081 
  1082 #allowExtendedBinarySelectors
  1082 #allowExtendedBinarySelectors
  1083 'Allow extended binary selectors (more than 2 characters, including "^", "|" and "#")'
  1083 'Allow extended binary selectors (more than 2 characters, including "^", "|" and "#")'
  1084 
  1084 
  1085 #allowFixedPointLiterals
  1085 #allowFixedPointLiterals
  1086 ''
  1086 'Allow <v>s<n> fixed point literals (scaled or fixed-point decimal v with n digits precision)'
  1087 
  1087 
  1088 #allowOldStyleAssignment
  1088 #allowOldStyleAssignment
  1089 'Allow "_" as assignment. May be required to filein Squeak code'
  1089 'Allow "_" as assignment. May be required to filein Squeak code'
  1090 
  1090 
  1091 #allowQualifiedNames
  1091 #allowQualifiedNames
  1093 
  1093 
  1094 #allowReservedWordsAsSelectors
  1094 #allowReservedWordsAsSelectors
  1095 'Allow "self", "super" as selectors. May be required to filein code from other Smalltalk dialects'
  1095 'Allow "self", "super" as selectors. May be required to filein code from other Smalltalk dialects'
  1096 
  1096 
  1097 #allowSqueakExtensions
  1097 #allowSqueakExtensions
  1098 'Allow some Squeak extensions (primitive spec after locals, brace array construction, c style arguments'
  1098 'Allow some Squeak extensions (primitive spec after locals, brace array construction, C style arguments'
  1099 
  1099 
  1100 #allowUnderscoreInIdentifier
  1100 #allowUnderscoreInIdentifier
  1101 'Allow underscore characters in identifiers. Not compatible with Squeak.'
  1101 'Allow underscore characters in identifiers. Not compatible with Squeak.'
  1102 
  1102 
  1103 "/#allowVisualAgeESSymbolLiterals
  1103 #allowVisualAgeESSymbolLiterals
  1104 "/''
  1104 'Allow VisualAge ESsymbol literals (##xxx).\Will generate regular symbols when compiled'
  1105 "/
  1105 
  1106 "/#allowVisualAgePrimitives
  1106 #allowVisualAgePrimitives
  1107 "/''
  1107 'Allow VisualAge primitive specification syntax'
  1108 "/
  1108 "/
  1109 "/#warnAboutPossibleSTCCompilationProblems
  1109 "/#warnAboutPossibleSTCCompilationProblems
  1110 "/''
  1110 "/''
  1111 "/
  1111 "/
  1112 "/#warnAboutPossiblyUnimplementedSelectors
  1112 #warnAboutPossiblyUnimplementedSelectors
  1113 "/''
  1113 'Warn about a possibly unimplemented selector in a smessage send'
       
  1114 
       
  1115 #warnAboutReferenceToPrivateClass
       
  1116 'Warn when another classes private class is referenced.\This is considered "bad style" and should be replaced by a getter-call to the owning class or the privae class be made public'
       
  1117 
       
  1118 #warnDollarInIdentifier
       
  1119 'Warn if an identifier contains a dollar character.\This is not allowed in most other Smalltalk dialects.'
       
  1120 
       
  1121 #warnOldStyleAssignment
       
  1122 'Warn if an old style assignment ("_" character) is used instead of the modern ":=".'
       
  1123 
       
  1124 #warnPlausibilityChecks
       
  1125 'Perform plausibility checks and warn about any such possible problem'
       
  1126 
       
  1127 #warnPossibleIncompatibilities
       
  1128 'Warn about other possible incompatibilities'
  1114 "/
  1129 "/
  1115 "/#warnAboutReferenceToPrivateClass
  1130 #warnSTXSpecials
  1116 "/''
  1131 'Warn when ST/X special syntax is encountered.\Such constructs may be unportable to other Smalltalk dialects'
  1117 "/
  1132 "/
  1118 "/#warnDollarInIdentifier
  1133 #warnUnderscoreInIdentifier
  1119 "/''
  1134 'Warn if an identifier contains an underline character.\This is not allowed in some old Smalltalk dialects.'
  1120 "/
       
  1121 "/#warnOldStyleAssignment
       
  1122 "/''
       
  1123 "/
       
  1124 "/#warnPlausibilityChecks
       
  1125 "/''
       
  1126 "/
       
  1127 "/#warnPossibleIncompatibilities
       
  1128 "/''
       
  1129 "/
       
  1130 "/#warnSTXSpecials
       
  1131 "/''
       
  1132 "/
       
  1133 "/#warnUnderscoreInIdentifier
       
  1134 "/''
       
  1135 
  1135 
  1136 #warnings
  1136 #warnings
  1137 'Turn off all warnings'
  1137 'Turn off all warnings'
  1138 
  1138 
  1139 )
  1139 )
  1241     "
  1241     "
  1242 
  1242 
  1243     <resource: #canvas>
  1243     <resource: #canvas>
  1244 
  1244 
  1245     ^ 
  1245     ^ 
  1246      #(FullSpec
  1246     #(FullSpec
  1247         name: windowSpec
  1247        name: windowSpec
  1248         window: 
  1248        window: 
  1249        (WindowSpec
  1249       (WindowSpec
  1250           label: 'Byte Code Compiler Settings'
  1250          label: 'Byte Code Compiler Settings'
  1251           name: 'Byte Code Compiler Settings'
  1251          name: 'Byte Code Compiler Settings'
  1252           min: (Point 10 10)
  1252          flags: 1
  1253           bounds: (Rectangle 0 0 665 706)
  1253          min: (Point 10 10)
  1254         )
  1254          bounds: (Rectangle 0 0 665 706)
  1255         component: 
  1255        )
  1256        (SpecCollection
  1256        component: 
  1257           collection: (
  1257       (SpecCollection
  1258            (VerticalPanelViewSpec
  1258          collection: (
  1259               name: 'VerticalPanel1'
  1259           (VerticalPanelViewSpec
  1260               layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
  1260              name: 'VerticalPanel1'
  1261               horizontalLayout: fit
  1261              layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
  1262               verticalLayout: top
  1262              horizontalLayout: fit
  1263               horizontalSpace: 3
  1263              verticalLayout: top
  1264               verticalSpace: 3
  1264              horizontalSpace: 3
  1265               component: 
  1265              verticalSpace: 3
  1266              (SpecCollection
  1266              component: 
  1267                 collection: (
  1267             (SpecCollection
  1268                  (CheckBoxSpec
  1268                collection: (
  1269                     label: 'Just in Time Compilation to Machine Code'
  1269                 (CheckBoxSpec
  1270                     name: 'JustInTimeCompilation'
  1270                    label: 'Just in Time Compilation to Machine Code'
  1271                     model: justInTimeCompilation
  1271                    name: 'JustInTimeCompilation'
  1272                     translateLabel: true
  1272                    model: justInTimeCompilation
  1273                     extent: (Point 665 25)
  1273                    translateLabel: true
  1274                   )
  1274                    extent: (Point 665 25)
  1275                  (DividerSpec
  1275                  )
  1276                     name: 'Separator3'
  1276                 (DividerSpec
  1277                     extent: (Point 665 3)
  1277                    name: 'Separator3'
  1278                   )
  1278                    extent: (Point 665 3)
  1279                  (ViewSpec
  1279                  )
  1280                     name: 'Box1'
  1280                 (ViewSpec
  1281                     component: 
  1281                    name: 'Box1'
  1282                    (SpecCollection
  1282                    component: 
  1283                       collection: (
  1283                   (SpecCollection
  1284                        (VerticalPanelViewSpec
  1284                      collection: (
  1285                           name: 'VerticalPanel1_1'
  1285                       (VerticalPanelViewSpec
  1286                           layout: (LayoutFrame 0 0 0 0 -20 0.5 0 1)
  1286                          name: 'VerticalPanel1_1'
  1287                           horizontalLayout: fit
  1287                          layout: (LayoutFrame 0 0 0 0 -20 0.5 0 1)
  1288                           verticalLayout: top
  1288                          horizontalLayout: fit
  1289                           horizontalSpace: 3
  1289                          verticalLayout: top
  1290                           verticalSpace: 0
  1290                          horizontalSpace: 3
  1291                           component: 
  1291                          verticalSpace: 0
  1292                          (SpecCollection
  1292                          component: 
  1293                             collection: (
  1293                         (SpecCollection
  1294                              (CheckBoxSpec
  1294                            collection: (
  1295                                 label: 'Allow Underscore in Identifiers'
  1295                             (CheckBoxSpec
  1296                                 name: 'AllowUnderscoreInIdentifiers'
  1296                                label: 'Allow Underscore in Identifiers'
  1297                                 activeHelpKey: allowUnderscoreInIdentifier
  1297                                name: 'AllowUnderscoreInIdentifiers'
  1298                                 model: allowUnderscoreInIdentifier
  1298                                activeHelpKey: allowUnderscoreInIdentifier
  1299                                 translateLabel: true
  1299                                model: allowUnderscoreInIdentifier
  1300                                 extent: (Point 313 22)
  1300                                translateLabel: true
  1301                               )
  1301                                extent: (Point 313 22)
  1302                              (CheckBoxSpec
       
  1303                                 label: 'Allow Dollar in Identifiers'
       
  1304                                 name: 'AllowDollarInIdentifiers'
       
  1305                                 activeHelpKey: allowDollarInIdentifier
       
  1306                                 model: allowDollarInIdentifier
       
  1307                                 translateLabel: true
       
  1308                                 extent: (Point 313 22)
       
  1309                               )
       
  1310                              (CheckBoxSpec
       
  1311                                 label: 'Allow VW3 QualifiedNames'
       
  1312                                 name: 'AllowVW3QualifiedNames'
       
  1313                                 activeHelpKey: allowQualifiedNames
       
  1314                                 model: allowQualifiedNames
       
  1315                                 translateLabel: true
       
  1316                                 extent: (Point 313 22)
       
  1317                               )
       
  1318                              (CheckBoxSpec
       
  1319                                 label: 'Allow OldStyle Assignment (_)'
       
  1320                                 name: 'AllowOldStyleAssignment'
       
  1321                                 activeHelpKey: allowOldStyleAssignment
       
  1322                                 model: allowOldStyleAssignment
       
  1323                                 translateLabel: true
       
  1324                                 extent: (Point 313 22)
       
  1325                               )
       
  1326                              (CheckBoxSpec
       
  1327                                 label: 'Allow Reserved Words as Selector (self)'
       
  1328                                 name: 'AllowReservedWordsAsSelector'
       
  1329                                 activeHelpKey: allowReservedWordsAsSelectors
       
  1330                                 model: allowReservedWordsAsSelectors
       
  1331                                 translateLabel: true
       
  1332                                 extent: (Point 313 22)
       
  1333                               )
       
  1334                              (CheckBoxSpec
       
  1335                                 label: 'Allow Extended Binary Selectors'
       
  1336                                 name: 'CheckBox4'
       
  1337                                 activeHelpKey: allowExtendedBinarySelectors
       
  1338                                 model: allowExtendedBinarySelectors
       
  1339                                 translateLabel: true
       
  1340                                 extent: (Point 313 22)
       
  1341                               )
       
  1342                              (CheckBoxSpec
       
  1343                                 label: 'Allow Assignment to Pool Variable'
       
  1344                                 name: 'CheckBox6'
       
  1345                                 activeHelpKey: allowAssignmentToPoolVariable
       
  1346                                 model: allowAssignmentToPoolVariable
       
  1347                                 translateLabel: true
       
  1348                                 extent: (Point 313 22)
       
  1349                               )
       
  1350                              )
  1302                              )
  1351                            
  1303                             (CheckBoxSpec
  1352                           )
  1304                                label: 'Allow Dollar in Identifiers'
  1353                         )
  1305                                name: 'AllowDollarInIdentifiers'
  1354                        (VerticalPanelViewSpec
  1306                                activeHelpKey: allowDollarInIdentifier
  1355                           name: 'VerticalPanel1_2'
  1307                                model: allowDollarInIdentifier
  1356                           layout: (LayoutFrame 0 0.5 0 0 0 1 0 1)
  1308                                translateLabel: true
  1357                           horizontalLayout: left
  1309                                extent: (Point 313 22)
  1358                           verticalLayout: top
       
  1359                           horizontalSpace: 3
       
  1360                           verticalSpace: 0
       
  1361                           component: 
       
  1362                          (SpecCollection
       
  1363                             collection: (
       
  1364                              (CheckBoxSpec
       
  1365                                 label: 'Allow Squeak Extensions'
       
  1366                                 name: 'AllowSqueakExtensions'
       
  1367                                 activeHelpKey: allowSqueakExtensions
       
  1368                                 model: allowSqueakExtensions
       
  1369                                 translateLabel: true
       
  1370                                 extent: (Point 665 22)
       
  1371                               )
       
  1372                              (CheckBoxSpec
       
  1373                                 label: 'Allow Dolphin Extensions'
       
  1374                                 name: 'AllowDolphinExtensions'
       
  1375                                 activeHelpKey: allowDolphinExtensions
       
  1376                                 model: allowDolphinExtensions
       
  1377                                 translateLabel: true
       
  1378                                 extent: (Point 665 22)
       
  1379                               )
       
  1380                              (CheckBoxSpec
       
  1381                                 label: 'Allow VisualAge ES-Symbols'
       
  1382                                 name: 'AllowVisualAgeESSymbolLiterals'
       
  1383                                 activeHelpKey: allowVisualAgeESSymbolLiterals
       
  1384                                 model: allowVisualAgeESSymbolLiterals
       
  1385                                 translateLabel: true
       
  1386                                 extent: (Point 665 22)
       
  1387                               )
       
  1388                              (CheckBoxSpec
       
  1389                                 label: 'Allow VisualAge Primitives'
       
  1390                                 name: 'CheckBox8'
       
  1391                                 activeHelpKey: allowVisualAgePrimitives
       
  1392                                 model: allowVisualAgePrimitives
       
  1393                                 translateLabel: true
       
  1394                                 extent: (Point 665 22)
       
  1395                               )
       
  1396                              (CheckBoxSpec
       
  1397                                 label: 'Allow FixedPoint-Number Literals'
       
  1398                                 name: 'AllowFixedPointLiterals'
       
  1399                                 activeHelpKey: allowFixedPointLiterals
       
  1400                                 model: allowFixedPointLiterals
       
  1401                                 translateLabel: true
       
  1402                                 extent: (Point 665 22)
       
  1403                               )
       
  1404                              (CheckBoxSpec
       
  1405                                 label: 'Allow Empty Statements'
       
  1406                                 name: 'AllowEmptyStatements'
       
  1407                                 activeHelpKey: allowEmptyStatements
       
  1408                                 model: allowEmptyStatements
       
  1409                                 translateLabel: true
       
  1410                                 extent: (Point 665 22)
       
  1411                               )
       
  1412                              )
  1310                              )
  1413                            
  1311                             (CheckBoxSpec
  1414                           )
  1312                                label: 'Allow VW3 QualifiedNames'
  1415                         )
  1313                                name: 'AllowVW3QualifiedNames'
  1416                        )
  1314                                activeHelpKey: allowQualifiedNames
  1417                      
  1315                                model: allowQualifiedNames
  1418                     )
  1316                                translateLabel: true
  1419                     extent: (Point 665 157)
  1317                                extent: (Point 313 22)
  1420                   )
       
  1421                  (DividerSpec
       
  1422                     name: 'Separator4'
       
  1423                     extent: (Point 665 1)
       
  1424                   )
       
  1425                  (CheckBoxSpec
       
  1426                     label: 'Warnings'
       
  1427                     name: 'Warnings'
       
  1428                     activeHelpKey: warnings
       
  1429                     model: warnings
       
  1430                     translateLabel: true
       
  1431                     extent: (Point 665 22)
       
  1432                   )
       
  1433                  (ViewSpec
       
  1434                     name: 'Box2'
       
  1435                     component: 
       
  1436                    (SpecCollection
       
  1437                       collection: (
       
  1438                        (VerticalPanelViewSpec
       
  1439                           name: 'VerticalPanel2_1'
       
  1440                           layout: (LayoutFrame 20 0 0 0 0 0.5 0 1)
       
  1441                           horizontalLayout: fit
       
  1442                           verticalLayout: top
       
  1443                           horizontalSpace: 3
       
  1444                           verticalSpace: 0
       
  1445                           component: 
       
  1446                          (SpecCollection
       
  1447                             collection: (
       
  1448                              (CheckBoxSpec
       
  1449                                 label: 'ST/X Extensions'
       
  1450                                 name: 'STXExtensions'
       
  1451                                 activeHelpKey: warnSTXSpecials
       
  1452                                 enableChannel: warnings
       
  1453                                 model: warnSTXSpecials
       
  1454                                 translateLabel: true
       
  1455                                 extent: (Point 313 22)
       
  1456                               )
       
  1457                              (CheckBoxSpec
       
  1458                                 label: 'Reference to Private Class'
       
  1459                                 name: 'CheckBox1'
       
  1460                                 activeHelpKey: warnAboutReferenceToPrivateClass
       
  1461                                 enableChannel: warnings
       
  1462                                 model: warnAboutReferenceToPrivateClass
       
  1463                                 translateLabel: true
       
  1464                                 extent: (Point 313 22)
       
  1465                               )
       
  1466                              (CheckBoxSpec
       
  1467                                 label: 'Underscores in Identifiers'
       
  1468                                 name: 'UnderscoresInIdentifiers'
       
  1469                                 activeHelpKey: warnUnderscoreInIdentifier
       
  1470                                 enableChannel: enableUnderscore
       
  1471                                 model: warnUnderscoreInIdentifier
       
  1472                                 translateLabel: true
       
  1473                                 extent: (Point 313 22)
       
  1474                               )
       
  1475                              (CheckBoxSpec
       
  1476                                 label: 'Dollars in Identifiers'
       
  1477                                 name: 'DollarsInIdentifiers'
       
  1478                                 activeHelpKey: warnDollarInIdentifier
       
  1479                                 enableChannel: enableDollar
       
  1480                                 model: warnDollarInIdentifier
       
  1481                                 translateLabel: true
       
  1482                                 extent: (Point 313 22)
       
  1483                               )
       
  1484                              (CheckBoxSpec
       
  1485                                 label: 'OldStyle Assignment'
       
  1486                                 name: 'OldStyleAssignment'
       
  1487                                 activeHelpKey: warnOldStyleAssignment
       
  1488                                 enableChannel: warnings
       
  1489                                 model: warnOldStyleAssignment
       
  1490                                 translateLabel: true
       
  1491                                 extent: (Point 313 22)
       
  1492                               )
       
  1493                              (CheckBoxSpec
       
  1494                                 label: 'Possible Incompatibilities'
       
  1495                                 name: 'PossibleIncompatibilities'
       
  1496                                 activeHelpKey: warnPossibleIncompatibilities
       
  1497                                 enableChannel: warnings
       
  1498                                 model: warnPossibleIncompatibilities
       
  1499                                 translateLabel: true
       
  1500                                 extent: (Point 313 22)
       
  1501                               )
       
  1502                              (CheckBoxSpec
       
  1503                                 label: 'Possible STC Compilation Problems'
       
  1504                                 name: 'PossibleSTCCompilationProblems'
       
  1505                                 activeHelpKey: warnAboutPossibleSTCCompilationProblems
       
  1506                                 enableChannel: warnings
       
  1507                                 model: warnAboutPossibleSTCCompilationProblems
       
  1508                                 translateLabel: true
       
  1509                                 extent: (Point 313 22)
       
  1510                               )
       
  1511                              (CheckBoxSpec
       
  1512                                 label: 'Possibly Unimplemented Selectors'
       
  1513                                 name: 'CheckBox3'
       
  1514                                 activeHelpKey: warnAboutPossiblyUnimplementedSelectors
       
  1515                                 enableChannel: warnings
       
  1516                                 model: warnAboutPossiblyUnimplementedSelectors
       
  1517                                 translateLabel: true
       
  1518                                 extent: (Point 313 22)
       
  1519                               )
       
  1520                              (CheckBoxSpec
       
  1521                                 label: 'Plausibility Checks'
       
  1522                                 name: 'CheckBox7'
       
  1523                                 activeHelpKey: warnPlausibilityChecks
       
  1524                                 enableChannel: warnings
       
  1525                                 model: warnPlausibilityChecks
       
  1526                                 translateLabel: true
       
  1527                                 extent: (Point 313 22)
       
  1528                               )
       
  1529                              )
  1318                              )
  1530                            
  1319                             (CheckBoxSpec
  1531                           )
  1320                                label: 'Allow OldStyle Assignment (_)'
  1532                         )
  1321                                name: 'AllowOldStyleAssignment'
  1533                        (VerticalPanelViewSpec
  1322                                activeHelpKey: allowOldStyleAssignment
  1534                           name: 'VerticalPanel2_2'
  1323                                model: allowOldStyleAssignment
  1535                           layout: (LayoutFrame -1 0.5 0 0 0 1 0 1)
  1324                                translateLabel: true
  1536                           horizontalLayout: left
  1325                                extent: (Point 313 22)
  1537                           verticalLayout: top
       
  1538                           horizontalSpace: 3
       
  1539                           verticalSpace: 0
       
  1540                           component: 
       
  1541                          (SpecCollection
       
  1542                             collection: (
       
  1543                              (CheckBoxSpec
       
  1544                                 label: 'Unused Method Variables'
       
  1545                                 name: 'UnusedMethodVariables'
       
  1546                                 enableChannel: warnings
       
  1547                                 model: warnUnusedVars
       
  1548                                 translateLabel: true
       
  1549                                 extent: (Point 600 22)
       
  1550                               )
       
  1551                              (CheckBoxSpec
       
  1552                                 label: 'Bad (non-English) Variable Names'
       
  1553                                 name: 'BadVariableNames'
       
  1554                                 enableChannel: warnings
       
  1555                                 model: warnAboutWrongVariableNames
       
  1556                                 translateLabel: true
       
  1557                                 extent: (Point 600 22)
       
  1558                               )
       
  1559                              (CheckBoxSpec
       
  1560                                 label: 'Bad (Non-Lowercase) Local Variable Names'
       
  1561                                 name: 'BadLocalVariableNames'
       
  1562                                 enableChannel: warnings
       
  1563                                 model: warnAboutNonLowercaseLocalVariableNames
       
  1564                                 translateLabel: true
       
  1565                                 extent: (Point 600 22)
       
  1566                               )
       
  1567                              (CheckBoxSpec
       
  1568                                 label: 'Bad (Short) Local Variable Names'
       
  1569                                 name: 'CheckBox2'
       
  1570                                 enableChannel: warnings
       
  1571                                 model: warnAboutShortLocalVariableNames
       
  1572                                 translateLabel: true
       
  1573                                 extent: (Point 600 22)
       
  1574                               )
       
  1575                              (CheckBoxSpec
       
  1576                                 label: 'Bad (empty) Comments'
       
  1577                                 name: 'BadComments'
       
  1578                                 enableChannel: warnings
       
  1579                                 model: warnAboutBadComments
       
  1580                                 translateLabel: true
       
  1581                                 extent: (Point 600 22)
       
  1582                               )
       
  1583                              (CheckBoxSpec
       
  1584                                 label: 'Method-Comment Missing '
       
  1585                                 name: 'CheckBox5'
       
  1586                                 enableChannel: warnings
       
  1587                                 model: warnAboutMissingMethodComment
       
  1588                                 translateLabel: true
       
  1589                                 extent: (Point 600 22)
       
  1590                               )
       
  1591                              (CheckBoxSpec
       
  1592                                 label: 'Inconsistent Return Values'
       
  1593                                 name: 'InconsistentReturnValues'
       
  1594                                 enableChannel: warnings
       
  1595                                 model: warnInconsistentReturnValues
       
  1596                                 translateLabel: true
       
  1597                                 extent: (Point 600 22)
       
  1598                               )
       
  1599                              (CheckBoxSpec
       
  1600                                 label: 'Common Mistakes'
       
  1601                                 name: 'CommonMistakes'
       
  1602                                 enableChannel: warnings
       
  1603                                 model: warnCommonMistakes
       
  1604                                 translateLabel: true
       
  1605                                 extent: (Point 600 22)
       
  1606                               )
       
  1607                              )
  1326                              )
  1608                            
  1327                             (CheckBoxSpec
  1609                           )
  1328                                label: 'Allow Reserved Words as Selector (self)'
  1610                         )
  1329                                name: 'AllowReservedWordsAsSelector'
  1611                        )
  1330                                activeHelpKey: allowReservedWordsAsSelectors
  1612                      
  1331                                model: allowReservedWordsAsSelectors
  1613                     )
  1332                                translateLabel: true
  1614                     extent: (Point 665 206)
  1333                                extent: (Point 313 22)
  1615                   )
  1334                              )
  1616                  (ViewSpec
  1335                             (CheckBoxSpec
  1617                     name: 'Box4'
  1336                                label: 'Allow Extended Binary Selectors'
  1618                     component: 
  1337                                name: 'CheckBox4'
  1619                    (SpecCollection
  1338                                activeHelpKey: allowExtendedBinarySelectors
  1620                       collection: (
  1339                                model: allowExtendedBinarySelectors
  1621                        (ActionButtonSpec
  1340                                translateLabel: true
  1622                           label: 'Reenable Suppressed Warnings Now'
  1341                                extent: (Point 313 22)
  1623                           name: 'Button1'
  1342                              )
  1624                           layout: (LayoutOrigin 0 0.5 0 0)
  1343                             (CheckBoxSpec
  1625                           translateLabel: true
  1344                                label: 'Allow Assignment to Pool Variable'
  1626                           model: reenableSuppressedWarnings
  1345                                name: 'CheckBox6'
  1627                         )
  1346                                activeHelpKey: allowAssignmentToPoolVariable
  1628                        )
  1347                                model: allowAssignmentToPoolVariable
  1629                      
  1348                                translateLabel: true
  1630                     )
  1349                                extent: (Point 313 22)
  1631                     extent: (Point 665 30)
  1350                              )
  1632                   )
  1351                             )
  1633                  (DividerSpec
  1352                           
  1634                     name: 'Separator5'
  1353                          )
  1635                     extent: (Point 665 2)
  1354                        )
  1636                   )
  1355                       (VerticalPanelViewSpec
  1637                  (CheckBoxSpec
  1356                          name: 'VerticalPanel1_2'
  1638                     label: 'Literal Strings are Immutable'
  1357                          layout: (LayoutFrame 0 0.5 0 0 0 1 0 1)
  1639                     name: 'LiteralStringsAreImmutable'
  1358                          horizontalLayout: left
  1640                     activeHelpKey: stringsAreImmutable
  1359                          verticalLayout: top
  1641                     model: stringsAreImmutable
  1360                          horizontalSpace: 3
  1642                     translateLabel: true
  1361                          verticalSpace: 0
  1643                     extent: (Point 665 22)
  1362                          component: 
  1644                   )
  1363                         (SpecCollection
  1645                  (CheckBoxSpec
  1364                            collection: (
  1646                     label: 'Literal Arrays are Immutable'
  1365                             (CheckBoxSpec
  1647                     name: 'CheckBox9'
  1366                                label: 'Allow Squeak Extensions'
  1648                     activeHelpKey: arraysAreImmutable
  1367                                name: 'AllowSqueakExtensions'
  1649                     model: arraysAreImmutable
  1368                                activeHelpKey: allowSqueakExtensions
  1650                     translateLabel: true
  1369                                model: allowSqueakExtensions
  1651                     extent: (Point 665 22)
  1370                                translateLabel: true
  1652                   )
  1371                                extent: (Point 665 22)
  1653                  (CheckBoxSpec
  1372                              )
  1654                     label: 'Full Debug Info'
  1373                             (CheckBoxSpec
  1655                     name: 'FullDebugInfo'
  1374                                label: 'Allow Dolphin Extensions'
  1656                     activeHelpKey: fullDebugInfo
  1375                                name: 'AllowDolphinExtensions'
  1657                     model: fullDebugSupport
  1376                                activeHelpKey: allowDolphinExtensions
  1658                     translateLabel: true
  1377                                model: allowDolphinExtensions
  1659                     extent: (Point 665 22)
  1378                                translateLabel: true
  1660                   )
  1379                                extent: (Point 665 22)
  1661                  (DividerSpec
  1380                              )
  1662                     name: 'Separator6'
  1381                             (CheckBoxSpec
  1663                     extent: (Point 665 2)
  1382                                label: 'Allow VisualAge ES-Symbols'
  1664                   )
  1383                                name: 'AllowVisualAgeESSymbolLiterals'
  1665                  (ViewSpec
  1384                                activeHelpKey: allowVisualAgeESSymbolLiterals
  1666                     name: 'Box3'
  1385                                model: allowVisualAgeESSymbolLiterals
  1667                     component: 
  1386                                translateLabel: true
  1668                    (SpecCollection
  1387                                extent: (Point 665 22)
  1669                       collection: (
  1388                              )
  1670                        (LabelSpec
  1389                             (CheckBoxSpec
  1671                           label: 'Constant Folding:'
  1390                                label: 'Allow VisualAge Primitives'
  1672                           name: 'ConstantFoldingLabel'
  1391                                name: 'CheckBox8'
  1673                           layout: (LayoutFrame 0 0 0 0 306 0 22 0)
  1392                                activeHelpKey: allowVisualAgePrimitives
  1674                           translateLabel: true
  1393                                model: allowVisualAgePrimitives
  1675                           adjust: right
  1394                                translateLabel: true
  1676                         )
  1395                                extent: (Point 665 22)
  1677                        (PopUpListSpec
  1396                              )
  1678                           label: 'PopUp List'
  1397                             (CheckBoxSpec
  1679                           name: 'ConstantFolding'
  1398                                label: 'Allow FixedPoint-Number Literals'
  1680                           layout: (LayoutFrame 313 0 0 0 -5 1 22 0)
  1399                                name: 'AllowFixedPointLiterals'
  1681                           tabable: true
  1400                                activeHelpKey: allowFixedPointLiterals
  1682                           model: constantFoldingSelection
  1401                                model: allowFixedPointLiterals
  1683                           menu: constantFolding
  1402                                translateLabel: true
  1684                           useIndex: true
  1403                                extent: (Point 665 22)
  1685                         )
  1404                              )
  1686                        )
  1405                             (CheckBoxSpec
  1687                      
  1406                                label: 'Allow Empty Statements'
  1688                     )
  1407                                name: 'AllowEmptyStatements'
  1689                     extent: (Point 665 22)
  1408                                activeHelpKey: allowEmptyStatements
  1690                   )
  1409                                model: allowEmptyStatements
       
  1410                                translateLabel: true
       
  1411                                extent: (Point 665 22)
       
  1412                              )
       
  1413                             )
       
  1414                           
       
  1415                          )
       
  1416                        )
       
  1417                       )
       
  1418                     
       
  1419                    )
       
  1420                    extent: (Point 665 157)
  1691                  )
  1421                  )
  1692                
  1422                 (DividerSpec
  1693               )
  1423                    name: 'Separator4'
  1694             )
  1424                    extent: (Point 665 1)
       
  1425                  )
       
  1426                 (CheckBoxSpec
       
  1427                    label: 'Warnings'
       
  1428                    name: 'Warnings'
       
  1429                    activeHelpKey: warnings
       
  1430                    model: warnings
       
  1431                    translateLabel: true
       
  1432                    extent: (Point 665 22)
       
  1433                  )
       
  1434                 (ViewSpec
       
  1435                    name: 'Box2'
       
  1436                    component: 
       
  1437                   (SpecCollection
       
  1438                      collection: (
       
  1439                       (VerticalPanelViewSpec
       
  1440                          name: 'VerticalPanel2_1'
       
  1441                          layout: (LayoutFrame 20 0 0 0 0 0.5 0 1)
       
  1442                          horizontalLayout: fit
       
  1443                          verticalLayout: top
       
  1444                          horizontalSpace: 3
       
  1445                          verticalSpace: 0
       
  1446                          component: 
       
  1447                         (SpecCollection
       
  1448                            collection: (
       
  1449                             (CheckBoxSpec
       
  1450                                label: 'ST/X Extensions'
       
  1451                                name: 'STXExtensions'
       
  1452                                activeHelpKey: warnSTXSpecials
       
  1453                                enableChannel: warnings
       
  1454                                model: warnSTXSpecials
       
  1455                                translateLabel: true
       
  1456                                extent: (Point 313 22)
       
  1457                              )
       
  1458                             (CheckBoxSpec
       
  1459                                label: 'Reference to Private Class'
       
  1460                                name: 'CheckBox1'
       
  1461                                activeHelpKey: warnAboutReferenceToPrivateClass
       
  1462                                enableChannel: warnings
       
  1463                                model: warnAboutReferenceToPrivateClass
       
  1464                                translateLabel: true
       
  1465                                extent: (Point 313 22)
       
  1466                              )
       
  1467                             (CheckBoxSpec
       
  1468                                label: 'Underscores in Identifiers'
       
  1469                                name: 'UnderscoresInIdentifiers'
       
  1470                                activeHelpKey: warnUnderscoreInIdentifier
       
  1471                                enableChannel: enableUnderscore
       
  1472                                model: warnUnderscoreInIdentifier
       
  1473                                translateLabel: true
       
  1474                                extent: (Point 313 22)
       
  1475                              )
       
  1476                             (CheckBoxSpec
       
  1477                                label: 'Dollars in Identifiers'
       
  1478                                name: 'DollarsInIdentifiers'
       
  1479                                activeHelpKey: warnDollarInIdentifier
       
  1480                                enableChannel: enableDollar
       
  1481                                model: warnDollarInIdentifier
       
  1482                                translateLabel: true
       
  1483                                extent: (Point 313 22)
       
  1484                              )
       
  1485                             (CheckBoxSpec
       
  1486                                label: 'OldStyle Assignment'
       
  1487                                name: 'OldStyleAssignment'
       
  1488                                activeHelpKey: warnOldStyleAssignment
       
  1489                                enableChannel: warnings
       
  1490                                model: warnOldStyleAssignment
       
  1491                                translateLabel: true
       
  1492                                extent: (Point 313 22)
       
  1493                              )
       
  1494                             (CheckBoxSpec
       
  1495                                label: 'Possible Incompatibilities'
       
  1496                                name: 'PossibleIncompatibilities'
       
  1497                                activeHelpKey: warnPossibleIncompatibilities
       
  1498                                enableChannel: warnings
       
  1499                                model: warnPossibleIncompatibilities
       
  1500                                translateLabel: true
       
  1501                                extent: (Point 313 22)
       
  1502                              )
       
  1503                             (CheckBoxSpec
       
  1504                                label: 'Possible STC Compilation Problems'
       
  1505                                name: 'PossibleSTCCompilationProblems'
       
  1506                                activeHelpKey: warnAboutPossibleSTCCompilationProblems
       
  1507                                enableChannel: warnings
       
  1508                                model: warnAboutPossibleSTCCompilationProblems
       
  1509                                translateLabel: true
       
  1510                                extent: (Point 313 22)
       
  1511                              )
       
  1512                             (CheckBoxSpec
       
  1513                                label: 'Possibly Unimplemented Selectors'
       
  1514                                name: 'CheckBox3'
       
  1515                                activeHelpKey: warnAboutPossiblyUnimplementedSelectors
       
  1516                                enableChannel: warnings
       
  1517                                model: warnAboutPossiblyUnimplementedSelectors
       
  1518                                translateLabel: true
       
  1519                                extent: (Point 313 22)
       
  1520                              )
       
  1521                             (CheckBoxSpec
       
  1522                                label: 'Plausibility Checks'
       
  1523                                name: 'CheckBox7'
       
  1524                                activeHelpKey: warnPlausibilityChecks
       
  1525                                enableChannel: warnings
       
  1526                                model: warnPlausibilityChecks
       
  1527                                translateLabel: true
       
  1528                                extent: (Point 313 22)
       
  1529                              )
       
  1530                             )
       
  1531                           
       
  1532                          )
       
  1533                        )
       
  1534                       (VerticalPanelViewSpec
       
  1535                          name: 'VerticalPanel2_2'
       
  1536                          layout: (LayoutFrame -1 0.5 0 0 0 1 0 1)
       
  1537                          horizontalLayout: left
       
  1538                          verticalLayout: top
       
  1539                          horizontalSpace: 3
       
  1540                          verticalSpace: 0
       
  1541                          component: 
       
  1542                         (SpecCollection
       
  1543                            collection: (
       
  1544                             (CheckBoxSpec
       
  1545                                label: 'Unused Method Variables'
       
  1546                                name: 'UnusedMethodVariables'
       
  1547                                enableChannel: warnings
       
  1548                                model: warnUnusedVars
       
  1549                                translateLabel: true
       
  1550                                extent: (Point 600 22)
       
  1551                              )
       
  1552                             (CheckBoxSpec
       
  1553                                label: 'Bad (non-English) Variable Names'
       
  1554                                name: 'BadVariableNames'
       
  1555                                enableChannel: warnings
       
  1556                                model: warnAboutWrongVariableNames
       
  1557                                translateLabel: true
       
  1558                                extent: (Point 600 22)
       
  1559                              )
       
  1560                             (CheckBoxSpec
       
  1561                                label: 'Bad (Non-Lowercase) Local Variable Names'
       
  1562                                name: 'BadLocalVariableNames'
       
  1563                                enableChannel: warnings
       
  1564                                model: warnAboutNonLowercaseLocalVariableNames
       
  1565                                translateLabel: true
       
  1566                                extent: (Point 600 22)
       
  1567                              )
       
  1568                             (CheckBoxSpec
       
  1569                                label: 'Bad (Short) Local Variable Names'
       
  1570                                name: 'CheckBox2'
       
  1571                                enableChannel: warnings
       
  1572                                model: warnAboutShortLocalVariableNames
       
  1573                                translateLabel: true
       
  1574                                extent: (Point 600 22)
       
  1575                              )
       
  1576                             (CheckBoxSpec
       
  1577                                label: 'Bad (empty) Comments'
       
  1578                                name: 'BadComments'
       
  1579                                enableChannel: warnings
       
  1580                                model: warnAboutBadComments
       
  1581                                translateLabel: true
       
  1582                                extent: (Point 600 22)
       
  1583                              )
       
  1584                             (CheckBoxSpec
       
  1585                                label: 'Method-Comment Missing '
       
  1586                                name: 'CheckBox5'
       
  1587                                enableChannel: warnings
       
  1588                                model: warnAboutMissingMethodComment
       
  1589                                translateLabel: true
       
  1590                                extent: (Point 600 22)
       
  1591                              )
       
  1592                             (CheckBoxSpec
       
  1593                                label: 'Inconsistent Return Values'
       
  1594                                name: 'InconsistentReturnValues'
       
  1595                                enableChannel: warnings
       
  1596                                model: warnInconsistentReturnValues
       
  1597                                translateLabel: true
       
  1598                                extent: (Point 600 22)
       
  1599                              )
       
  1600                             (CheckBoxSpec
       
  1601                                label: 'Common Mistakes'
       
  1602                                name: 'CommonMistakes'
       
  1603                                enableChannel: warnings
       
  1604                                model: warnCommonMistakes
       
  1605                                translateLabel: true
       
  1606                                extent: (Point 600 22)
       
  1607                              )
       
  1608                             )
       
  1609                           
       
  1610                          )
       
  1611                        )
       
  1612                       )
       
  1613                     
       
  1614                    )
       
  1615                    extent: (Point 665 206)
       
  1616                  )
       
  1617                 (ViewSpec
       
  1618                    name: 'Box4'
       
  1619                    component: 
       
  1620                   (SpecCollection
       
  1621                      collection: (
       
  1622                       (ActionButtonSpec
       
  1623                          label: 'Reenable Suppressed Warnings Now'
       
  1624                          name: 'Button1'
       
  1625                          layout: (LayoutOrigin 0 0.5 0 0)
       
  1626                          translateLabel: true
       
  1627                          model: reenableSuppressedWarnings
       
  1628                        )
       
  1629                       )
       
  1630                     
       
  1631                    )
       
  1632                    extent: (Point 665 30)
       
  1633                  )
       
  1634                 (DividerSpec
       
  1635                    name: 'Separator5'
       
  1636                    extent: (Point 665 2)
       
  1637                  )
       
  1638                 (CheckBoxSpec
       
  1639                    label: 'Literal Strings are Immutable'
       
  1640                    name: 'LiteralStringsAreImmutable'
       
  1641                    activeHelpKey: stringsAreImmutable
       
  1642                    model: stringsAreImmutable
       
  1643                    translateLabel: true
       
  1644                    extent: (Point 665 22)
       
  1645                  )
       
  1646                 (CheckBoxSpec
       
  1647                    label: 'Literal Arrays are Immutable'
       
  1648                    name: 'CheckBox9'
       
  1649                    activeHelpKey: arraysAreImmutable
       
  1650                    model: arraysAreImmutable
       
  1651                    translateLabel: true
       
  1652                    extent: (Point 665 22)
       
  1653                  )
       
  1654                 (CheckBoxSpec
       
  1655                    label: 'Full Debug Info'
       
  1656                    name: 'FullDebugInfo'
       
  1657                    activeHelpKey: fullDebugInfo
       
  1658                    model: fullDebugSupport
       
  1659                    translateLabel: true
       
  1660                    extent: (Point 665 22)
       
  1661                  )
       
  1662                 (DividerSpec
       
  1663                    name: 'Separator6'
       
  1664                    extent: (Point 665 2)
       
  1665                  )
       
  1666                 (ViewSpec
       
  1667                    name: 'Box3'
       
  1668                    component: 
       
  1669                   (SpecCollection
       
  1670                      collection: (
       
  1671                       (LabelSpec
       
  1672                          label: 'Constant Folding:'
       
  1673                          name: 'ConstantFoldingLabel'
       
  1674                          layout: (LayoutFrame 0 0 0 0 306 0 22 0)
       
  1675                          translateLabel: true
       
  1676                          adjust: right
       
  1677                        )
       
  1678                       (PopUpListSpec
       
  1679                          label: 'PopUp List'
       
  1680                          name: 'ConstantFolding'
       
  1681                          layout: (LayoutFrame 313 0 0 0 -5 1 22 0)
       
  1682                          tabable: true
       
  1683                          model: constantFoldingSelection
       
  1684                          menu: constantFolding
       
  1685                          useIndex: true
       
  1686                        )
       
  1687                       )
       
  1688                     
       
  1689                    )
       
  1690                    extent: (Point 665 22)
       
  1691                  )
       
  1692                 )
       
  1693               
       
  1694              )
  1695            )
  1695            )
  1696          
  1696           )
  1697         )
  1697         
  1698       )
  1698        )
       
  1699      )
  1699 ! !
  1700 ! !
  1700 
  1701 
  1701 !AbstractSettingsApplication::ByteCodeCompilerSettingsAppl methodsFor:'actions'!
  1702 !AbstractSettingsApplication::ByteCodeCompilerSettingsAppl methodsFor:'actions'!
  1702 
  1703 
  1703 basicReadSettings
  1704 basicReadSettings
 19267 ! !
 19268 ! !
 19268 
 19269 
 19269 !AbstractSettingsApplication class methodsFor:'documentation'!
 19270 !AbstractSettingsApplication class methodsFor:'documentation'!
 19270 
 19271 
 19271 version
 19272 version
 19272     ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.533 2014-04-18 20:05:31 cg Exp $'
 19273     ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.534 2014-05-06 16:06:42 cg Exp $'
 19273 !
 19274 !
 19274 
 19275 
 19275 version_CVS
 19276 version_CVS
 19276     ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.533 2014-04-18 20:05:31 cg Exp $'
 19277     ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.534 2014-05-06 16:06:42 cg Exp $'
 19277 ! !
 19278 ! !
 19278 
 19279