Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
16
Task/XML-Output/Rascal/xml-output-1.rascal
Normal file
16
Task/XML-Output/Rascal/xml-output-1.rascal
Normal file
|
|
@ -0,0 +1,16 @@
|
|||
import Prelude;
|
||||
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)){
|
||||
throw "n and r should be of the same size";
|
||||
}
|
||||
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));
|
||||
}
|
||||
}
|
||||
10
Task/XML-Output/Rascal/xml-output-2.rascal
Normal file
10
Task/XML-Output/Rascal/xml-output-2.rascal
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
rascal>xmloutput(charnames, remarks)
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<CharacterRemarks>
|
||||
<Character name="April">Bubbly: I'\m > Tam and <= Emily</Character>
|
||||
<Character name="Tam O'\Shanter">Burns: "When chapman billies leave the street ..."</Character>
|
||||
<Character name="Emily">Short & shrift</Character>
|
||||
</CharacterRemarks>
|
||||
|
||||
|
||||
ok
|
||||
Loading…
Add table
Add a link
Reference in a new issue