From d1b2e9f598fb8e4c0bb46fda3bc2b8e03ff1db55 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Wed, 4 Sep 2024 13:48:26 -0400
Subject: Disallow 'use' statements that aren't top level

---
 ast.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'ast.c')

diff --git a/ast.c b/ast.c
index b380a04f..901144f3 100644
--- a/ast.c
+++ b/ast.c
@@ -152,7 +152,7 @@ CORD ast_to_xml(ast_t *ast)
     T(FieldAccess, "<FieldAccess field=\"%s\">%r</FieldAccess>", data.field, ast_to_xml(data.fielded))
     T(Optional, "<Optional>%r</Optional>", ast_to_xml(data.value))
     T(DocTest, "<DocTest>%r<output>%r</output></DocTest>", optional_tagged("expression", data.expr), xml_escape(data.output))
-    T(Use, "<Use>%r</Use>", xml_escape(data.name))
+    T(Use, "<Use>%r</Use>", xml_escape(data.path))
     T(LinkerDirective, "<LinkerDirective>%r</LinkerDirective>", xml_escape(data.directive))
     T(InlineCCode, "<InlineCode>%r</InlineCode>", xml_escape(data.code))
 #undef T
-- 
cgit v1.2.3