author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Mon, 24 Aug 2015 17:31:06 +0100 | |
changeset 526 | cc0ce8edda63 |
parent 452 | 9f4558b3be66 |
permissions | -rw-r--r-- |
"{ Package: 'stx:goodies/petitparser/compiler' }" "{ NameSpace: Smalltalk }" PPCRewritingVisitor subclass:#PPCCopyVisitor instanceVariableNames:'' classVariableNames:'' poolDictionaries:'' category:'PetitCompiler-Visitors' ! !PPCCopyVisitor methodsFor:'as yet unclassified'! visitNode: node | newNode | self change. newNode := node copy. ^ super visitNode: newNode. ! !