Browse Source

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

git-svn-id: trunk@20843 -
Jonas Maebe 13 years ago
parent
commit
07a65fed6b

+ 1 - 1
tests/tbs/tb0193.pp

@@ -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}

+ 4 - 0
tests/test/texception10.pp

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

+ 1 - 5
tests/webtbs/tw16263b.pp

@@ -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

+ 1 - 5
tests/webtbs/tw6822b.pp

@@ -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}

+ 5 - 4
tests/webtbs/tw8153a.pp

@@ -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

+ 6 - 0
tests/webtbs/tw9073.pp

@@ -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