summaryrefslogtreecommitdiff
path: root/UEngines.pas
diff options
context:
space:
mode:
Diffstat (limited to 'UEngines.pas')
-rw-r--r--UEngines.pas6
1 files changed, 6 insertions, 0 deletions
diff --git a/UEngines.pas b/UEngines.pas
index b4dc319..1c51a62 100644
--- a/UEngines.pas
+++ b/UEngines.pas
@@ -1126,8 +1126,14 @@ begin
if FName <> nil then libc_free(FName);
if FDisplayName <> nil then libc_free(FDisplayName);
if LnkPointTo <> nil then libc_free(LnkPointTo);
+{$IFDEF CPUPOWERPC}
+ Writeln('FreeDataItem: before free ColumnData');
+{$ENDIF}
for i := 0 to Length(ColumnData) - 1 do
if ColumnData[i] <> nil then libc_free(ColumnData[i]);
+{$IFDEF CPUPOWERPC}
+ Writeln('FreeDataItem: after free ColumnData');
+{$ENDIF}
end;
libc_free(DataItem);
end;