AbstractLauncherApplication.st
changeset 3479 c068d829d733
parent 3475 b057e853174d
child 3480 7f13d0a4ae1d
--- a/AbstractLauncherApplication.st	Mon Dec 03 15:33:21 2001 +0100
+++ b/AbstractLauncherApplication.st	Mon Dec 03 16:33:59 2001 +0100
@@ -2141,6 +2141,7 @@
 
     |box warnings warnSTX warnUnderscore warnDollar warnOldStyle warnUnusedVars
      allowDollar allowUnderscore allowSqueakExtensions allowQualifiedNames
+     allowDolphinExtensions   
      immutableArrays
      warnSTXBox warnUnderscoreBox warnOldStyleBox warnCommonMistakes warnCommonMistakesBox
      warnCompatibility warnCompatibilityBox warnDollarBox warnUnusedVarsBox
@@ -2171,6 +2172,7 @@
     allowUnderscore := Compiler allowUnderscoreInIdentifier asValue.
     allowDollar := Compiler allowDollarInIdentifier asValue.
     allowSqueakExtensions := Compiler allowSqueakExtensions asValue.
+    allowDolphinExtensions := Compiler allowDolphinExtensions asValue.
     allowQualifiedNames := Compiler allowQualifiedNames asValue.
     immutableArrays := Compiler arraysAreImmutable asValue.
 
@@ -2320,10 +2322,13 @@
     component := box addCheckBox:(resources string:'allow dollar in identifiers') on:allowDollar.
     component width:0.4.
 
-    component := box addCheckBox:(resources string:'allow squeak syntax extensions') on:allowSqueakExtensions.
+    component := box addCheckBox:(resources string:'allow vw3 qualifiedNames') on:allowQualifiedNames.
     component width:0.4.
 
-    component := box addCheckBox:(resources string:'allow vw3 qualifiedNames') on:allowQualifiedNames.
+    component := box addCheckBox:(resources string:'allow squeak extensions') on:allowSqueakExtensions.
+    component width:0.4.
+
+    component := box addCheckBox:(resources string:'allow dolphin extensions') on:allowDolphinExtensions.
     component width:0.4.
 
     y2 := box yPosition.
@@ -2412,6 +2417,7 @@
         Compiler allowUnderscoreInIdentifier:allowUnderscore value.
         Compiler allowDollarInIdentifier:allowDollar value.
         Compiler allowSqueakExtensions:allowSqueakExtensions value.
+        Compiler allowDolphinExtensions:allowDolphinExtensions value.
         Compiler allowQualifiedNames:allowQualifiedNames value.
         Compiler arraysAreImmutable:immutableArrays value.
         fullDebugSupport value ifTrue:[
@@ -6356,5 +6362,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.182 2001-11-28 13:56:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.183 2001-12-03 15:33:59 cg Exp $'
 ! !