parsers/java/extensions.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Mon, 23 Nov 2015 11:14:30 +0100
changeset 551 00ebb1b85f53
parent 454 a9cd5ea7cc36
permissions -rw-r--r--
Fixed CI scripts on Windows For an unknown reason, unzip on Windows reports status code 50 (presumably "the disk is (or was) full during extraction.") even if there's plenty of space. To workaround this, simply ignore status code 50 on Windows. Sigh.

"{ 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:'*petitcompiler'!

javaToken
    | ws |
    ws := PPJavaWhitespaceParser new.
    ^ ((ws, ((PPTokenParser on: self) tokenClass: PPJavaToken; yourself), ws) ==> #second)
        propertyAt: #'trimmingToken' put: true;
        yourself
! !

!stx_goodies_petitparser_parsers_java class methodsFor:'documentation'!

extensionsVersion_HG

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