Data commit

Task/XML-DOM-serialization/J/xml-dom-serialization-1.j

@@ -0,0 +1,11 @@
+serialize=: ('<?xml version="1.0" ?>',LF),;@serialize1&''
+serialize1=:4 :0
+  if.L.x do.
+    start=. y,'<',(0{::x),'>',LF
+    middle=. ;;(}.x) serialize1&.> <'    ',y
+    end=. y,'</',(0{::x),'>',LF
+    <start,middle,end
+  else.
+    <y,x,LF
+  end.
+)

Task/XML-DOM-serialization/J/xml-dom-serialization-2.j

@@ -0,0 +1 @@
+obj=: 'root';<'element';'some text here'

Task/XML-DOM-serialization/J/xml-dom-serialization-3.j

@@ -0,0 +1,7 @@
+   serialize obj
+<?xml version="1.0" ?>
+<root>
+    <element>
+        some text here
+    </element>
+</root>