XML generator changes

2007-12-04 16:33:46 -05:00 · 2007-12-04 16:33:46 -05:00 · fa5b1edca2
parent 0c3e6501fe
commit fa5b1edca2
1 changed files with 1 additions and 4 deletions
--- a/extra/xml/generator/generator.factor
+++ b/extra/xml/generator/generator.factor
@ -25,10 +25,7 @@ IN: xml.generator
 : make-xml ( name quot -- xml )
    f swap make-xml* ; inline

-SYMBOL: namespace-table
-: with-namespaces ( table quot -- )
-    >r H{ } assoc-like namespace-table r> with-variable ; inline
-
+! Word-based XML literal syntax
 : parsed-name ( accum -- accum )
    scan ":" split1 [ f <name> ] [ <name-tag> ] if* parsed ;