Fixed closure upvalue scoping
This commit is contained in:
@@ -295,7 +295,11 @@ end;
|
||||
|
||||
function TAstDumper.VisitVariableDeclaration(const Node: IVariableDeclarationNode): TDataValue;
|
||||
begin
|
||||
Log('VariableDeclaration');
|
||||
if Node is TBoundVariableDeclarationNode then
|
||||
LogFmt('VariableDeclaration (IsBoxed: %s)', [(Node as TBoundVariableDeclarationNode).IsBoxed.ToString(TUseBoolStrs.True)])
|
||||
else
|
||||
Log('VariableDeclaration (unbound)');
|
||||
|
||||
Indent;
|
||||
Node.Identifier.Accept(Self);
|
||||
if Assigned(Node.Initializer) then
|
||||
|
||||
Reference in New Issue
Block a user