xml.backend moved into xml.state

basis/xml/backend/backend.factor

@@ -1,6 +0,0 @@
-! Copyright (C) 2008 Daniel Ehrenberg
-! See http://factorcode.org/license.txt for BSD license.
-IN: xml.backend
-
-! A stack of { tag children } pairs
-SYMBOL: xml-stack

basis/xml/errors/errors.factor

@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: xml.data xml.writer kernel generic io prettyprint math 
 debugger sequences xml.state accessors summary
-namespaces io.streams.string xml.backend xml.writer.private ;
+namespaces io.streams.string ;
 IN: xml.errors
 
 TUPLE: parsing-error line column ;

basis/xml/state/state.factor

@@ -17,3 +17,9 @@ C: <spot> spot
 : set-next ( char -- ) spot get swap >>next drop ;
 : get-check ( -- ? ) spot get check>> ;
 : check ( -- ) spot get t >>check drop ;
+
+SYMBOL: xml-stack
+
+SYMBOL: prolog-data
+
+SYMBOL: depth

basis/xml/tokenize/tokenize.factor

@@ -6,10 +6,6 @@ circular xml.entities assocs make splitting math.parser
 locals combinators arrays ;
 IN: xml.tokenize
 
-SYMBOL: prolog-data
-
-SYMBOL: depth
-
 : version=1.0? ( -- ? )
     prolog-data get [ version>> "1.0" = ] [ t ] if* ;
 

basis/xml/xml.factor

@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors arrays io io.encodings.binary io.files
 io.streams.string kernel namespaces sequences strings io.encodings.utf8
-xml.backend xml.data xml.errors xml.elements ascii xml.entities
+xml.data xml.errors xml.elements ascii xml.entities
 xml.writer xml.state xml.autoencoding assocs xml.tokenize xml.name ;
 IN: xml