Move patterns into a module

1 files changed, 1 insertions, 0 deletions

diff --git a/src/ast.c b/src/ast.c
index 5f4e24f1..75795d61 100644
--- a/src/ast.c
+++ b/src/ast.c
@@ -165,6 +165,7 @@ CORD ast_to_xml(ast_t *ast)
     T(Use, "<Use>%r%r</Use>", optional_tagged("var", data.var), xml_escape(data.path))
     T(InlineCCode, "<InlineCode>%r</InlineCode>", xml_escape(data.code))
     T(Deserialize, "<Deserialize><type>%r</type>%r</Deserialize>", type_ast_to_xml(data.type), ast_to_xml(data.value))
+    T(Extend, "<Extend name=\"%s\">%r</Extend>", data.name, ast_to_xml(data.body))
     default: return "???";
 #undef T
     }