--- a/Parser.st	Thu Jul 25 19:43:58 2002 +0200
+++ b/Parser.st	Thu Jul 25 19:44:06 2002 +0200
@@ -4981,7 +4981,7 @@
         ].
         ^ self primary_dolphinComputedLiteral.
     ].
-    tokenType == #HashHashLeftBrack ifTrue:[
+    tokenType == #ExclaLeftBrack ifTrue:[
         self nextToken.
         AllowLazyValueExtension == true ifFalse:[
             self parseError:'non-Standard LazyValue extension (enable in classVariable)' position:pos to:tokenPosition.
@@ -5496,7 +5496,13 @@
 
     "
      Compiler allowSqueakExtensions:true.
-     { 1@2. 10 factorial. Date today }.
+    "
+
+    "
+     { 1@2. 10 factorial. Date today }.     
+    "
+
+   "
      Compiler allowSqueakExtensions:false.
     "
 !
@@ -6674,6 +6680,6 @@
 !Parser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.342 2002-07-25 16:48:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.343 2002-07-25 17:44:06 cg Exp $'
 ! !
 Parser initialize!