"{ Package: 'stx:goodies/petitparser/parsers/java' }"!

!Integer class methodsFor:'*PetitJava-AST'!

readFromJavaString: aString
	^ Number readFromString: (
		(aString asLowercase beginsWith: '0x')
			ifTrue: [ '16r', (aString allButFirst: 2) ]
			ifFalse: [ aString size > 1 & aString first = $0
				ifTrue: [ '8r', aString ]
				ifFalse: [ aString ]])
! !

!PPParser methodsFor:'*petitjava-operations'!

javaToken
	^ PPJavaTokenParser on: self
! !

!stx_goodies_petitparser_parsers_java class methodsFor:'documentation'!

extensionsVersion_HG

    ^ '$Changeset: <not expanded> $'
! !