Traverse der Formel-Bäume II

[Vorheriges Kapitel] [Vorherige Seite] [Inhaltsverzeichnis] [Nächste Seite] [Nächstes Kapitel]

TestExpr.om
PROCEDURE TraverseInorder(at: Expressions.Attribute);
BEGIN
   IF at # NIL THEN
      TraverseInorder(at.leftop);
      Visit(at);
      TraverseInorder(at.rightop);
   END;
END TraverseInorder;

PROCEDURE TraversePostorder(at: Expressions.Attribute);
BEGIN
   IF at # NIL THEN
      TraversePostorder(at.leftop);
      TraversePostorder(at.rightop);
      Visit(at);
   END;
END TraversePostorder;

[Vorheriges Kapitel] [Vorherige Seite] [Inhaltsverzeichnis] [Nächste Seite] [Nächstes Kapitel]
Copyright © 1999 Andreas Borchert, in HTML konvertiert am 29.06.1999