author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Mon, 24 Aug 2015 17:38:44 +0100 | |
changeset 527 | 9b50ec9a6918 |
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. ! !