diff -r 54b3bc9e3987 -r 20598d7ce9fa compiler/PPCAbstractPredicateNode.st --- a/compiler/PPCAbstractPredicateNode.st Tue Apr 21 17:20:11 2015 +0100 +++ b/compiler/PPCAbstractPredicateNode.st Thu Apr 30 23:43:14 2015 +0200 @@ -35,7 +35,7 @@ ^ PPCharSetPredicate on: predicate ! ! -!PPCAbstractPredicateNode methodsFor:'comparison'! +!PPCAbstractPredicateNode methodsFor:'comparing'! = anotherNode super = anotherNode ifFalse: [ ^ false ]. @@ -48,30 +48,7 @@ !PPCAbstractPredicateNode methodsFor:'compiling'! -bodyOfPredicate: compiler - self subclassResponsibility -! - -compileWith: compiler effect: effect id: id - compiler startMethod: id. - compiler add: '^'. - self bodyOfPredicate: compiler. - ^ compiler stopMethod. -! - extendClassification: classification ^ (classification asOrderedCollection addLast: false; yourself) asArray ! ! -!PPCAbstractPredicateNode methodsFor:'initialization'! - -initialize - super initialize. -! ! - -!PPCAbstractPredicateNode methodsFor:'optimizing'! - -asInlined - ^ super asInlined -! ! -