XML/Output: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: indented some DO loops for easier purusing. -- ~~~~) |
m (→{{header|REXX}}: adjusted a DO-loop indentation. -- ~~~~) |
||
| Line 1,505: | Line 1,505: | ||
header=header'>' |
header=header'>' |
||
do j=1 while charname.j\=='' |
do j=1 while charname.j\=='' |
||
_=charname.j |
_=charname.j |
||
if j==1 then call create '<'header |
|||
call create ' <Character name="' ||, |
|||
char2xml(_)'">"' ||, |
|||
char2xml(remark.j)'"</Character>' |
|||
end /*j*/ |
|||
if create.0\==0 then call create '</'header |
if create.0\==0 then call create '</'header |
||