test xml construction

Author: lindahua

run_tests.jl

@@ -1,4 +1,4 @@
-tests = ["parse"]
+tests = ["parse", "create"]
 
 for t in tests
 	fpath = joinpath("test", "$t.jl")

test/create.jl

@@ -12,10 +12,14 @@ xs2 = new_child(xroot, "State")
 add_text(xs2, "Illinois")
 set_attribute(xs2, "tag", "MA")
 
-show(xdoc)
-
-show(xroot)
-
-# save_file(xdoc, "tt.xml")
+rtxt = """
+<?xml version="1.0" encoding="utf-8"?>
+<States>
+  <State tag="MA">Massachusetts</State>
+  <State tag="MA">Illinois</State>
+</States>
+"""
+
+@assert strip(string(xdoc)) == strip(rtxt)
 
 free(xdoc)

test/dump.jl

@@ -3,7 +3,7 @@ using MiniXML
 # document
 
 docstr = """
-<?xml version=\"1.0\" encoding=\"UTF-8\"?>
+<?xml version="1.0" encoding="UTF-8"?>
 <bookstore>
   <book category="COOKING" tag="first">
     <title lang="en">Everyday Italian</title>

test/parse.jl

@@ -4,7 +4,7 @@ using Base.Test
 # document
 
 docstr = """
-<?xml version=\"1.0\" encoding=\"UTF-8\"?>
+<?xml version="1.0" encoding="UTF-8"?>
 <bookstore>
   <book category="COOKING" tag="first">
     <title lang="en">Everyday Italian</title>