Visualizer node aggregates

Fix in macro expander

Src/AST/Myc.Ast.Nodes.pas

@@ -68,6 +68,12 @@ type
         akNop // Added Nop
     );
 
+    // Helper for TAstNodeKind providing a string representation
+    TAstNodeKindHelper = record helper for TAstNodeKind
+    public
+        function ToString: string;
+    end;
+
     // --- Concrete Type Definitions ---
 
     // Defines how an identifier's address was resolved.
@@ -377,7 +383,18 @@ type
 implementation
 
 uses
-    System.Classes;
+    System.Classes,
+    System.Rtti,
+    System.StrUtils;
+
+{ TAstNodeKindHelper }
+
+function TAstNodeKindHelper.ToString: string;
+begin
+    Result := TRttiEnumerationType.GetName<TAstNodeKind>(Self);
+    Assert(StartsText('ak', Result));
+    Result := Result.Substring(2);
+end;
 
 { TResolvedAddress }