xml library - node traversing

Author: buraq

sources/scala/xml/NodeSeq.scala

@@ -11,6 +11,10 @@ package scala.xml ;
 
 object NodeSeq {
   final val Empty = new NodeSeq { def theSeq = Nil; }
+  def fromSeq(s:Seq[Node]):NodeSeq = new NodeSeq {
+    def theSeq = s;
+  }
+  def view(s:Seq[Node]):NodeSeq = fromSeq(s);
 }
 
 /** a wrapper around Seq[Node] that adds XPath and comprehension methods */

sources/scala/xml/NodeTraverser.scala

@@ -0,0 +1,19 @@
+package scala.xml;
+
+import parsing.MarkupHandler;
+
+trait NodeTraverser extends MarkupHandler {
+
+  def traverse(n:Node): Unit = n match {
+    case x:ProcInstr => procInstr(0, x.target, x.text)
+    case x:Comment   => comment(0, x.text)
+    case x:Text      => text(0, x.data)
+    case x:EntityRef => entityRef(0, x.entityName)
+    case _ =>
+      elemStart(0, n.prefix, n.label, n.attributes, n.scope);
+      for(val m <- n.child)
+        traverse(m);
+      elem(0, n.prefix, n.label, n.attributes, n.scope, NodeSeq.fromSeq(n.child));
+      elemEnd(0, n.prefix, n.label);
+  }
+}

sources/scala/xml/parsing/MarkupHandler.scala

@@ -21,17 +21,14 @@ import scala.util.logging._;
  *  @todo can we ignore more entity declarations (i.e. those with extIDs)?
  *  @todo expanding entity references
  */
-abstract class MarkupHandler extends AnyRef with Logged with ConsoleLogger {
+abstract class MarkupHandler extends AnyRef with Logged {
 
   // impl. of Logged
   //def log(msg:String) = {}
 
   /** returns true is this markup handler is validing */
   val isValidating: Boolean = false;
 
-  /** if true, does not remove surplus whitespace */
-  val preserveWS: Boolean;
-
   var decls: List[Decl] = Nil;
 
   var ent:  Map[String, EntityDecl]  = new HashMap[String, EntityDecl]();

sources/scala/xml/parsing/MarkupParser.scala

@@ -27,6 +27,9 @@ abstract class MarkupParser: (MarkupParser with MarkupHandler) extends AnyRef wi
 
   val input: Source;
 
+  /** if true, does not remove surplus whitespace */
+  val preserveWS: Boolean;
+
   def externalSource(systemLiteral: String): Source;
 
   //