@@ -1129,45 +1129,6 @@ module Trees {
11291129 }
11301130 }
11311131
1132- /**
1133- * Control-flow tree for any pre-order StmtSequence that doesn't have a more
1134- * specific implementation.
1135- * TODO: make all StmtSequence tree classes post-order, and simplify class
1136- * hierarchy.
1137- */
1138- private class SimplePreOrderStmtSequenceTree extends StmtSequenceTree , PreOrderTree {
1139- SimplePreOrderStmtSequenceTree ( ) {
1140- not this instanceof BodyStmtTree and
1141- not this instanceof EndBlock and
1142- not this instanceof StringInterpolationComponent and
1143- not this instanceof Block and
1144- not this instanceof ParenthesizedExpr and
1145- not this instanceof BeginBlock and
1146- not this instanceof ASTInternal:: TThen and
1147- not this instanceof ASTInternal:: TDo and
1148- not this instanceof ASTInternal:: TElse and
1149- not this instanceof ASTInternal:: TEnsure
1150- }
1151-
1152- final override predicate propagatesAbnormal ( AstNode child ) { child = this .getAStmt ( ) }
1153-
1154- final override predicate last ( AstNode last , Completion c ) {
1155- last ( this .getLastStmt ( ) , last , c )
1156- or
1157- not exists ( this .getLastStmt ( ) ) and
1158- c .isValidFor ( this ) and
1159- last = this
1160- }
1161-
1162- final override predicate succ ( AstNode pred , AstNode succ , Completion c ) {
1163- pred = this and
1164- first ( this .getBodyChild ( 0 , _) , succ ) and
1165- c instanceof SimpleCompletion
1166- or
1167- StmtSequenceTree .super .succ ( pred , succ , c )
1168- }
1169- }
1170-
11711132 private class SingletonClassTree extends BodyStmtPostOrderTree , SingletonClass {
11721133 final override predicate first ( AstNode first ) {
11731134 this .firstInner ( first )
0 commit comments