--- a/Scanner.st	Fri Sep 30 11:59:55 2011 +0200
+++ b/Scanner.st	Fri Sep 30 12:28:22 2011 +0200
@@ -2308,7 +2308,7 @@
             nextChar := source nextPeek.
             nextChar == $( ifTrue:[
                 parserFlags allowDolphinExtensions == true ifTrue:[
-                "dolphin does computed literals as ##( ... )"
+                    "dolphin does computed literals as ##( ... )"
                     source next.    
                     token := '##('.
                     tokenType := #HashHashLeftParen.
@@ -2368,6 +2368,7 @@
     ^ tokenType
 
     "Modified: / 01-08-2006 / 14:57:19 / cg"
+    "Modified (format): / 30-09-2011 / 12:23:04 / cg"
 !
 
 nextId
@@ -3352,7 +3353,7 @@
 !Scanner class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.266 2011-08-25 13:39:09 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.267 2011-09-30 10:28:22 cg Exp $'
 ! !
 
 Scanner initialize!