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/compiler' }"
"{ NameSpace: Smalltalk }"
PPCDelegateNode subclass:#PPCForwardNode
instanceVariableNames:''
classVariableNames:''
poolDictionaries:''
category:'PetitCompiler-Nodes'
!
!PPCForwardNode methodsFor:'accessing'!
child: node
"(node name asString beginsWith: 'symbol') ifTrue: [ self halt. ]."
^ super child: node
!
defaultName
^ #fw
! !
!PPCForwardNode methodsFor:'analysis'!
check
^ (self name notNil and: [
child name = self name and: [
child suffix = self suffix
]]) ifTrue: [ 'referring to itself!!' ]
! !
!PPCForwardNode methodsFor:'visiting'!
accept: visitor
^ visitor visitForwardNode: self
! !