mirror of
https://github.com/polserver/polserver
synced 2026-08-13 08:23:08 -04:00
ea0c533364
ecompile/runecl no longer try to log to pol logs activated xml unittest print stderr on testfailure
53 lines
1.2 KiB
Text
53 lines
1.2 KiB
Text
use file;
|
|
|
|
program XMLTest()
|
|
print("itertest...");
|
|
itertest();
|
|
print("membertest...");
|
|
membertest();
|
|
print("scopetest...");
|
|
scopetest();
|
|
endprogram
|
|
|
|
function itertest()
|
|
var xml:=OpenXMLFile("filemod/xmltest.xml");
|
|
print(xml);
|
|
parsenode(xml,"");
|
|
endfunction
|
|
|
|
function parsenode(node,i)
|
|
foreach blubb in node
|
|
print(i+cstr(blubb)+" ["+blubb.type+"] ("+cstr(_blubb_iter)+")");
|
|
parseattrib(blubb,i+"-");
|
|
parsenode(blubb,i+" ");
|
|
endforeach
|
|
endfunction
|
|
|
|
function parseattrib(node,i)
|
|
foreach ele in (node.attributes)
|
|
print(i+cstr(ele)+" ("+_ele_iter+")");
|
|
endforeach
|
|
endfunction
|
|
|
|
function membertest()
|
|
var xml:=OpenXMLFile("filemod/xmltest.xml");
|
|
var root:=xml[2];
|
|
print("root= "+root);
|
|
print("firstchild= "+root.firstxmlchild());
|
|
print("firstchildstring= "+root.firstxmlchild("nodetwo"));
|
|
print("firstsibling= "+root.firstxmlchild().nextxmlsibling());
|
|
var node:=root.firstxmlchild("nodetwo");
|
|
print("attributes= "+node.attributes.propnames());
|
|
print("attributes= "+node.attributes["j"]);
|
|
endfunction
|
|
|
|
function scopetest()
|
|
var elem:=scopeloose();
|
|
print("root= "+elem);
|
|
print("firstchild= "+elem.firstxmlchild());
|
|
endfunction
|
|
|
|
function scopeloose()
|
|
var xml:=OpenXMLFile("filemod/xmltest.xml");
|
|
return xml[2].clonenode();
|
|
endfunction
|