--- 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!