parsers/java/PJQualifiedNameNode.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Mon, 23 Nov 2015 11:14:30 +0100
changeset 551 00ebb1b85f53
parent 436 e1c44b571db9
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' }"

"{ NameSpace: Smalltalk }"

PJNameNode subclass:#PJQualifiedNameNode
	instanceVariableNames:'qualifier simpleName'
	classVariableNames:''
	poolDictionaries:''
	category:'PetitJava-AST'
!

!PJQualifiedNameNode class methodsFor:'instance creation'!

name: aPJSimpleName qualifier: aPJName

	^(self new) simpleName: aPJSimpleName ; qualifier: aPJName; yourself
! !

!PJQualifiedNameNode methodsFor:'accessing'!

fullyQualifiedName
	^ (self qualifier fullyQualifiedName ) , '.' , self simpleName fullyQualifiedName
!

qualifier
	^ qualifier
!

qualifier: anObject
	qualifier := anObject
!

simpleName
	^ simpleName
!

simpleName: anObject
	simpleName := anObject
! !