--- a/src/tools/JavaParserI.st Thu Mar 15 09:06:05 2012 +0000
+++ b/src/tools/JavaParserI.st Thu Mar 15 11:23:37 2012 +0000
@@ -65,7 +65,10 @@
block
"Do no parse content of the block"
- ^ '{' asParser , '}' asParser
+
+ ^JavaBlockParser new
+
+"/ ^ (self tokenFor: '{') , (self tokenFor: '}')
"Created: / 11-03-2012 / 13:20:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
@@ -639,6 +642,16 @@
"Created: / 12-03-2012 / 16:51:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+!JavaParserI methodsFor:'parsing'!
+
+parse: anObject
+ "Parse anObject with the receiving parser and answer the parse-result or an instance of PPFailure."
+
+ ^super parse: (JavaScanner for: anObject readStream)
+
+ "Created: / 15-03-2012 / 11:10:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
!JavaParserI methodsFor:'querying'!
productionAt: aSymbol ifAbsent: aBlock