Bruce/tomo
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Activity

More XML fixes

Browse Source
This commit is contained in:
Bruce Hill 2024-03-26 12:45:34 -04:00
parent a30f588378
commit 047eb93fa8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ast.c
View File

@ -58,8 +58,8 @@ CORD when_clauses_to_xml(when_clause_t *clauses) {
CORD c = CORD_EMPTY;
for (; clauses; clauses = clauses->next) {
c = CORD_all(c, "<case");
if (clauses->var) c = CORD_all(c, " var=", Match(clauses->var, Var)->name);
c = CORD_all(c, " tag=", ast_to_xml(clauses->tag_name), ">", ast_to_xml(clauses->body), "</case>");
if (clauses->var) c = CORD_all(c, " var=\"", Match(clauses->var, Var)->name, "\"");
c = CORD_all(c, " tag=\"", ast_to_xml(clauses->tag_name), "\">", ast_to_xml(clauses->body), "</case>");
}
return c;
}