From 95dbf1260264603b86892530d6b581a35bdb4385 Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@redhat.com>
Date: Sat, 3 Oct 2009 14:28:09 +0200
Subject: PowerPC cleanup

Cleanup debugging outputs on PPC port. We still need those malloc() and free()
workarounds but at least it's stable now.
Tested on iBook G4 and proved working with glibc-2.10.90-24.ppc (Fedora 12).
Plugins work fine except of the zip plugin, most likely bug in ZipArchive.

The only requirement is sufficiently new FPC, fpc-2.5.1 snapshot works
out of the box, for stable fpc-2.2.4 release you need powerpc.diff patch
(fpcsrc/compiler/powerpc/cpupara.pas) from Debian fpc_2.2.4-3
see http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=513891
---
 ULibc.pas | 7 -------
 1 file changed, 7 deletions(-)

(limited to 'ULibc.pas')

diff --git a/ULibc.pas b/ULibc.pas
index 63902f5..5ff010f 100644
--- a/ULibc.pas
+++ b/ULibc.pas
@@ -1017,21 +1017,14 @@ end;
 
 
 {$IFDEF CPUPOWERPC}
-function xmalloc(size: size_t): Pointer; cdecl; external GLIBC_LIB name 'malloc';
-procedure xfree(ptr: Pointer); cdecl; external GLIBC_LIB name 'free';
-
 function malloc(size: size_t): Pointer;
 begin
   Result := GetMem(size);
-//  Result := xmalloc(size);
-  WriteLn('malloc(', size, '): 0x', IntToHex(DWORD(Result), 4));
 end;
 
 procedure libc_free(ptr: Pointer);
 begin
-  WriteLn('free(0x', IntToHex(DWORD(ptr), 4), ')');
   FreeMem(ptr);
-//  xfree(ptr);
 end;
 
 procedure free(ptr: Pointer);
-- 
cgit v1.2.3