Class {
	#name : #GrafoscopioVisitor,
	#superclass : #Object,
	#category : #'Grafoscopio-Model'
}

{ #category : #visiting }
GrafoscopioVisitor >> visitBranchNode: aNode [
	self visitNode: aNode.
	aNode children do: [ : c | c acceptVisitor: self  ].
]

{ #category : #'as yet unclassified' }
GrafoscopioVisitor >> visitGrafoscopioProject: aGrafoscopioProject [ 
	self visitNode: aGrafoscopioProject .
	aGrafoscopioProject document acceptVisitor: self.
]

{ #category : #visiting }
GrafoscopioVisitor >> visitLeafNode: aNode [
	self visitNode: aNode
]

{ #category : #visiting }
GrafoscopioVisitor >> visitNode: aNode [
	" nothing to do here"
]

{ #category : #visiting }
GrafoscopioVisitor >> visitRootNode: aNode [
	self visitNode: aNode.
	aNode children do: [ : c | c acceptVisitor: self  ].
]

{ #category : #visiting }
GrafoscopioVisitor >> visitTextNode: aNode [
	self visitNode: aNode
]

{ #category : #visiting }
GrafoscopioVisitor >> visitUnitNode: aNode [
	self visitNode: aNode.
	aNode children do: [ : c | c acceptVisitor: self  ].
]