XML/Output: Difference between revisions

m (→‎{{header|REXX}}: removed superflous blanks. -- ~~~~)
Line 1,411:
import lang::xml::DOM;
 
list[str] charnames = ["April", "Tam O\'\\Shanter", "Emily"];
list[str] remarks = ["Bubbly: I\'\\m \> Tam and \<= Emily", "Burns: \"When chapman billies leave the street ...\"", "Short & shrift"];
 
public void xmloutput(list[str] n,list[str] r){
if(size(n) != size(r)){
characters = [element(none(),"Character",[attribute(none(),"name",n[i]), charData(r[i])]),charData("\n")| i <- [0..size(n)-1]];
throw "n and r should be of the same size";
x = document(element(none(),"CharacterRemarks",characters));
}
return println(xmlPretty(x));
else{
characters = [element(none(),"Character",[attribute(none(),"name",n[i]), charData(r[i])]),charData("\n")| i <- [0..size(n)-1]];
x = document(element(none(),"CharacterRemarks",characters));
return println(xmlPretty(x));
}
}</lang>
This gives an output:
Anonymous user