--- a/compiler/PPCNilNode.st Tue Apr 21 17:20:11 2015 +0100
+++ b/compiler/PPCNilNode.st Thu Apr 30 23:43:14 2015 +0200
@@ -9,33 +9,29 @@
category:'PetitCompiler-Nodes'
!
-!PPCNilNode methodsFor:'analyzing'!
+!PPCNilNode methodsFor:'accessing'!
-isNullable
- ^ true
+prefix
+ ^ #nil
! !
-!PPCNilNode methodsFor:'as yet unclassified'!
+!PPCNilNode methodsFor:'analysis'!
acceptsEpsilon
^ true
!
-asInlined
- ^ PPCInlineNilNode new
-!
-
-compileWith: compiler effect: effect id: id
- compiler startMethod: id.
- compiler add: '^ nil.'.
- ^ compiler stopMethod.
-!
-
firstCharSet
^ PPCharSetPredicate on: [:e | false ]
!
-prefix
- ^ #nil
+isNullable
+ ^ true
! !
+!PPCNilNode methodsFor:'visiting'!
+
+accept: visitor
+ ^ visitor visitNilNode: self
+! !
+