* adapted tests for aix (assembler code, -CN switch, library name suffix)

git-svn-id: trunk@20843 -
This commit is contained in:
Jonas Maebe 2012-04-11 18:06:43 +00:00
parent 247033cce1
commit 07a65fed6b
6 changed files with 18 additions and 15 deletions

View File

@ -22,7 +22,7 @@ end ['EAX'];
end ['D0'];
{$endif CPU68K}
{$ifdef cpupowerpc}
{$ifndef macos}
{$if not defined(macos) and not defined(aix)}
lis r3, stacksize@ha
lwz r3, stacksize@l(r3)
{$else macos}

View File

@ -1,5 +1,9 @@
{$ifdef fpc}{$mode objfpc}{$H+}{$endif}
{$ifdef aix}
{$CHECKLOWADDRLOADS+}
{$endif}
uses
Classes, SysUtils;

View File

@ -12,11 +12,7 @@ const
{$ifdef windows}
libname='tw16263a.dll';
{$else}
{$ifdef darwin}
libname = './libtw16263a.dylib';
{$else darwin}
libname = './libtw16263a.so';
{$endif darwin}
libname = './libtw16263a.'+SharedSuffix;
{$endif}
var

View File

@ -10,11 +10,7 @@ var
h: TLibHandle;
const
{$ifdef unix}
{$ifdef darwin}
libname = './libtw6822a.dylib';
{$else darwin}
libname = './libtw6822a.so';
{$endif darwin}
libname = './libtw6822a.'+SharedSuffix;
{$endif unix}
{$ifdef windows}

View File

@ -16,15 +16,16 @@ asm
// for simplicity sake do not bother about setting the GOT and
// environment pointer correctly
ld r4,0(r3)
{$ifdef linux}
ld r4,+vmtoffset tc.v(r4)
{$if defined(linux) or defined(aix)}
ld r4,0(r4)
{$else linux}
ld r4,+vmtoffset tc.v(r4)
{$endif linux}
{$endif linux or aix}
{$else}
lwz r4,0(r3)
lwz r4,+vmtoffset tc.v(r4)
{$if defined(aix)}
lwz r4,0(r4)
{$endif aix}
{$endif}
mtctr r4
bctr

View File

@ -1,3 +1,9 @@
{ %opt=-CN }
{ the -CN is to generated null pointer load checks for AIX,
ignored on other platforms because there the OS performs
this checking for you }
{$mode objfpc}
uses