Fixed quasiquote expansinon

ASTPlayground/MainForm.pas

@@ -263,7 +263,7 @@ begin
     FWorkspace.Align := TAlignLayout.Client;
     FWorkspace.ClipChildren := true;
     FWorkspace.OnMouseDown := WorkspaceMouseDown;
-    {
+
     TAst.RegisterLibrary(
         procedure(const Scope: IExecutionScope)
         var
@@ -357,7 +357,7 @@ begin
             );
         end
     );
- }
+
     ClearButtonClick(Self);
 end;
 

Src/AST/Myc.Ast.MacroExpander.pas

@@ -315,7 +315,7 @@ begin
         end;
 
     // 4. Expand the macro body using the TExpansionVisitor
-    var expandedBody := TExpansionVisitor.Expand(expansionScope, macroDef.Body.AsUnquoteSplicing.Expression, evaluatorProc);
+    var expandedBody := TExpansionVisitor.Expand(expansionScope, macroDef.Body.AsQuasiquote.Expression, evaluatorProc);
 
     // 5. Wrap the result in a MacroExpansionNode (for debugging/tracing)
     var macroNode := TAst.MacroExpansionNode(Node, expandedBody);