From 690f784c4d2f9000872b6dd8fa0dae724d5b1c4c Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Sun, 14 Aug 2016 14:09:24 +0000
Subject: [PATCH]  * enable 40+ tests for Haiku as per mantis #30470

git-svn-id: trunk@34312 -
---
 tests/tbs/tb0038.pp                   | 2 +-
 tests/tbs/tb0089.pp                   | 2 +-
 tests/tbs/tb0105.pp                   | 2 +-
 tests/tbs/tb0225.pp                   | 2 +-
 tests/tbs/tb0359.pp                   | 2 +-
 tests/tbs/tb0524.pp                   | 2 +-
 tests/tbs/tb0561a.pp                  | 2 +-
 tests/tbs/tb0561b.pp                  | 2 +-
 tests/test/opt/twpo4.pp               | 2 +-
 tests/test/opt/twpo5.pp               | 2 +-
 tests/test/packages/webtbs/tw14265.pp | 2 +-
 tests/test/testfpuc.pp                | 7 ++++++-
 tests/webtbf/tw25788.pp               | 2 +-
 tests/webtbs/tw0876.pp                | 2 +-
 tests/webtbs/tw11563.pp               | 2 +-
 tests/webtbs/tw14958a.pp              | 2 +-
 tests/webtbs/tw14958b.pp              | 2 +-
 tests/webtbs/tw15582.pp               | 2 +-
 tests/webtbs/tw16949a.pp              | 2 +-
 tests/webtbs/tw16949b.pp              | 2 +-
 tests/webtbs/tw18009.pp               | 2 +-
 tests/webtbs/tw25164.pp               | 2 +-
 tests/webtbs/tw25169.pp               | 2 +-
 tests/webtbs/tw3161.pp                | 2 +-
 tests/webtbs/tw3257.pp                | 2 +-
 tests/webtbs/tw3964a.pp               | 2 +-
 tests/webtbs/tw3964b.pp               | 2 +-
 tests/webtbs/tw6586a.pp               | 2 +-
 tests/webtbs/tw6586b.pp               | 2 +-
 tests/webtbs/tw6687.pp                | 2 +-
 tests/webtbs/tw6822c.pp               | 2 +-
 tests/webtbs/tw7808.pp                | 2 +-
 tests/webtbs/tw7838a.pp               | 2 +-
 tests/webtbs/tw7838b.pp               | 2 +-
 tests/webtbs/tw8155.pp                | 2 +-
 tests/webtbs/tw8730a.pp               | 2 +-
 tests/webtbs/tw8730b.pp               | 2 +-
 tests/webtbs/tw8730c.pp               | 2 +-
 tests/webtbs/tw8730d.pp               | 2 +-
 tests/webtbs/tw9089a.pp               | 2 +-
 tests/webtbs/tw9089b.pp               | 2 +-
 tests/webtbs/tw9089c.pp               | 2 +-
 tests/webtbs/tw9089d.pp               | 2 +-
 43 files changed, 48 insertions(+), 43 deletions(-)

diff --git a/tests/tbs/tb0038.pp b/tests/tbs/tb0038.pp
index 6336c3ce59..72f12f5b14 100644
--- a/tests/tbs/tb0038.pp
+++ b/tests/tbs/tb0038.pp
@@ -1,5 +1,5 @@
 { %CPU=i386 }
-{ %TARGET=go32v2,win32,linux }
+{ %TARGET=go32v2,win32,linux,haiku }
 { %NOTE=This test requires an installed Nasm }
 
 { Old file: tbs0043.pp }
diff --git a/tests/tbs/tb0089.pp b/tests/tbs/tb0089.pp
index e96d058854..e624bd482b 100644
--- a/tests/tbs/tb0089.pp
+++ b/tests/tbs/tb0089.pp
@@ -1,4 +1,4 @@
-{ %TARGET=go32v2,linux }
+{ %TARGET=go32v2,linux,haiku }
 { %SKIPEMU=qemu-arm }
 
 { Old file: tbs0105.pp }
diff --git a/tests/tbs/tb0105.pp b/tests/tbs/tb0105.pp
index a92cefa724..69e3238d92 100644
--- a/tests/tbs/tb0105.pp
+++ b/tests/tbs/tb0105.pp
@@ -1,4 +1,4 @@
-{ %TARGET=linux,go32v2 }
+{ %TARGET=linux,go32v2,haiku }
 { %CPU=i386 }
 { %OPT= -Aas -Cg- }
 
diff --git a/tests/tbs/tb0225.pp b/tests/tbs/tb0225.pp
index 5ceb7cb0e6..4f47fd06f9 100644
--- a/tests/tbs/tb0225.pp
+++ b/tests/tbs/tb0225.pp
@@ -1,4 +1,4 @@
-{ %TARGET=win32,linux,wince }
+{ %TARGET=win32,linux,wince,haiku }
 { %needlibrary }
 { %NORUN }
 
diff --git a/tests/tbs/tb0359.pp b/tests/tbs/tb0359.pp
index d5fddc2f3c..bca42b9f9e 100644
--- a/tests/tbs/tb0359.pp
+++ b/tests/tbs/tb0359.pp
@@ -1,5 +1,5 @@
 { %version=1.1 }
-{ %TARGET=linux,freebsd,darwin,solaris,aix }
+{ %TARGET=linux,freebsd,darwin,solaris,aix,haiku }
 
 {$linklib c}
 
diff --git a/tests/tbs/tb0524.pp b/tests/tbs/tb0524.pp
index 3c4df26421..c01247957c 100644
--- a/tests/tbs/tb0524.pp
+++ b/tests/tbs/tb0524.pp
@@ -1,4 +1,4 @@
-{%TARGET=linux,freebsd,darwin,aix,openbsd,netbsd}
+{%TARGET=linux,freebsd,darwin,aix,openbsd,netbsd,haiku}
 program tb0524;
 
 uses sockets,baseunix,sysutils;
diff --git a/tests/tbs/tb0561a.pp b/tests/tbs/tb0561a.pp
index af1d4fe28e..75eb52f243 100644
--- a/tests/tbs/tb0561a.pp
+++ b/tests/tbs/tb0561a.pp
@@ -1,5 +1,5 @@
 { %norun }
-{ %target=linux }
+{ %target=linux,haiku }
 
 program test;
 
diff --git a/tests/tbs/tb0561b.pp b/tests/tbs/tb0561b.pp
index e6143778f6..f9df1c35c9 100644
--- a/tests/tbs/tb0561b.pp
+++ b/tests/tbs/tb0561b.pp
@@ -1,4 +1,4 @@
-{ %target=linux }
+{ %target=linux,haiku }
 
 program setup;
 
diff --git a/tests/test/opt/twpo4.pp b/tests/test/opt/twpo4.pp
index 0d42356171..5981528f68 100644
--- a/tests/test/opt/twpo4.pp
+++ b/tests/test/opt/twpo4.pp
@@ -1,4 +1,4 @@
-{ %target=darwin,linux,freebsd,solaris,aix }
+{ %target=darwin,linux,freebsd,solaris,aix,haiku }
 { %wpoparas=devirtcalls,optvmts,symbolliveness }
 { %wpopasses=2 }
 { %opt=-CX -XX -Xs- -g- }
diff --git a/tests/test/opt/twpo5.pp b/tests/test/opt/twpo5.pp
index ab56e2a6db..920864e623 100644
--- a/tests/test/opt/twpo5.pp
+++ b/tests/test/opt/twpo5.pp
@@ -1,4 +1,4 @@
-{ %target=darwin,linux,freebsd,solaris,aix }
+{ %target=darwin,linux,freebsd,solaris,aix,haiku }
 { %wpoparas=devirtcalls,optvmts,symbolliveness }
 { %wpopasses=2 }
 { %opt=-CX -XX -Xs- -g- }
diff --git a/tests/test/packages/webtbs/tw14265.pp b/tests/test/packages/webtbs/tw14265.pp
index 33834710a8..d9f12fd66b 100644
--- a/tests/test/packages/webtbs/tw14265.pp
+++ b/tests/test/packages/webtbs/tw14265.pp
@@ -1,4 +1,4 @@
-{ %target=linux }
+{ %target=linux,haiku }
 { %opt=-Xt }
 
 program phello;
diff --git a/tests/test/testfpuc.pp b/tests/test/testfpuc.pp
index b62bc969ea..073fb4571c 100644
--- a/tests/test/testfpuc.pp
+++ b/tests/test/testfpuc.pp
@@ -1,12 +1,17 @@
-{ %target=linux,freebsd,darwin,solaris,aix,android }
+{ %target=linux,freebsd,darwin,solaris,aix,android,haiku }
 
 {$mode objfpc}
 program testr;
 
 uses sysutils;
 function sprintf(buf,fmt : pchar) : longint; varargs;cdecl; external 'c';
+{$ifdef haiku}
+function cosh(f : double) : double; cdecl; external 'root';
+function ccos(f : double) : double; cdecl; external 'root' name 'cos';
+{$else}
 function cosh(f : double) : double; cdecl; external 'm';
 function ccos(f : double) : double; cdecl; external 'm' name 'cos';
+{$endif}
 
 Type
   TTest = Class(TObject)
diff --git a/tests/webtbf/tw25788.pp b/tests/webtbf/tw25788.pp
index 25220b1ecc..73959861db 100644
--- a/tests/webtbf/tw25788.pp
+++ b/tests/webtbf/tw25788.pp
@@ -1,7 +1,7 @@
 { %norun }
 { %opt=-Cg }
 { %fail }
-{ %target=linux,freebsd,darwin }
+{ %target=linux,freebsd,darwin,haiku }
 
 unit tw25788;
 
diff --git a/tests/webtbs/tw0876.pp b/tests/webtbs/tw0876.pp
index be69e3d94d..d20e7ca00a 100644
--- a/tests/webtbs/tw0876.pp
+++ b/tests/webtbs/tw0876.pp
@@ -1,4 +1,4 @@
-{ %target=go32v2,linux,freebsd,darwin }
+{ %target=go32v2,linux,freebsd,darwin,haiku }
 { %note=This test needs C libraries }
 { %OPT=-pg }
 
diff --git a/tests/webtbs/tw11563.pp b/tests/webtbs/tw11563.pp
index 669af948b9..1d03b348de 100644
--- a/tests/webtbs/tw11563.pp
+++ b/tests/webtbs/tw11563.pp
@@ -1,4 +1,4 @@
-{ %target=linux}
+{ %target=linux,haiku}
 { %result=216 }
 
 program ExecStack;
diff --git a/tests/webtbs/tw14958a.pp b/tests/webtbs/tw14958a.pp
index 11294ea549..a8d5213857 100644
--- a/tests/webtbs/tw14958a.pp
+++ b/tests/webtbs/tw14958a.pp
@@ -1,4 +1,4 @@
-{ %target=linux }
+{ %target=linux,haiku }
 { %needlibrary }
 { %norun }
 library tw14958a;
diff --git a/tests/webtbs/tw14958b.pp b/tests/webtbs/tw14958b.pp
index 879c3cdcee..8071a735b9 100644
--- a/tests/webtbs/tw14958b.pp
+++ b/tests/webtbs/tw14958b.pp
@@ -1,4 +1,4 @@
-{ %target=linux }
+{ %target=linux,haiku }
 { %needlibrary }
 { %result=182 }
 program loadlib;
diff --git a/tests/webtbs/tw15582.pp b/tests/webtbs/tw15582.pp
index 0b75c8353f..db8f3c38cc 100644
--- a/tests/webtbs/tw15582.pp
+++ b/tests/webtbs/tw15582.pp
@@ -1,5 +1,5 @@
 { %cpu=x86_64,i386,powerpc,powerpc64}
-{ %skiptarget=linux,freebsd,netbsd,openbsd,win32,os2,emx,go32v2}
+{ %skiptarget=linux,freebsd,netbsd,openbsd,win32,os2,emx,go32v2,haiku}
 
 { should actually only skip i386-variants of win32/linux/.. for now, but that can't be specified }
 
diff --git a/tests/webtbs/tw16949a.pp b/tests/webtbs/tw16949a.pp
index 6a00a20ae8..a406564b42 100644
--- a/tests/webtbs/tw16949a.pp
+++ b/tests/webtbs/tw16949a.pp
@@ -1,6 +1,6 @@
 { %norun }
 { %needlibrary }
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 
 library tw16949a;
 
diff --git a/tests/webtbs/tw16949b.pp b/tests/webtbs/tw16949b.pp
index 9fa72b72bc..42bc5b6e66 100644
--- a/tests/webtbs/tw16949b.pp
+++ b/tests/webtbs/tw16949b.pp
@@ -1,4 +1,4 @@
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 { %needlibrary }
 { %delfiles=tw16949a }
 
diff --git a/tests/webtbs/tw18009.pp b/tests/webtbs/tw18009.pp
index f50467edc5..17322a2d36 100644
--- a/tests/webtbs/tw18009.pp
+++ b/tests/webtbs/tw18009.pp
@@ -1,5 +1,5 @@
 { %CPU=i386 }
-{ %TARGET=go32v2,win32,linux }
+{ %TARGET=go32v2,win32,linux,haiku }
 { %NOTE=This test requires an installed Nasm }
 { %OPT=-Cg- }
 
diff --git a/tests/webtbs/tw25164.pp b/tests/webtbs/tw25164.pp
index 0ba56e9ca8..d10dfb6ef4 100644
--- a/tests/webtbs/tw25164.pp
+++ b/tests/webtbs/tw25164.pp
@@ -1,5 +1,5 @@
 { %opt=-Cg }
-{ %target=-linux,freebsd,darwin }
+{ %target=-linux,freebsd,darwin,haiku }
 { %norun }
 {$mode objfpc}
 
diff --git a/tests/webtbs/tw25169.pp b/tests/webtbs/tw25169.pp
index a851eb9d44..d9d4472243 100644
--- a/tests/webtbs/tw25169.pp
+++ b/tests/webtbs/tw25169.pp
@@ -1,4 +1,4 @@
-{ %target=darwin,linux,freebsd,openbsd,netbsd,solaris }
+{ %target=darwin,linux,freebsd,openbsd,netbsd,solaris,haiku }
 
 uses
   unixcp;
diff --git a/tests/webtbs/tw3161.pp b/tests/webtbs/tw3161.pp
index f4623e0062..8e1a42fef3 100644
--- a/tests/webtbs/tw3161.pp
+++ b/tests/webtbs/tw3161.pp
@@ -1,4 +1,4 @@
-{ %target=linux }
+{ %target=linux,haiku }
 
 { Source provided for Free Pascal Bug Report 3161 }
 { Submitted by "Michalis Kamburelis" on  2004-06-12 }
diff --git a/tests/webtbs/tw3257.pp b/tests/webtbs/tw3257.pp
index 263668501e..62d48cb167 100644
--- a/tests/webtbs/tw3257.pp
+++ b/tests/webtbs/tw3257.pp
@@ -1,4 +1,4 @@
-{ %target=linux,freebsd }
+{ %target=linux,freebsd,haiku }
 
 { Source provided for Free Pascal Bug Report 3257 }
 { Submitted by "peter green" on  2004-08-18 }
diff --git a/tests/webtbs/tw3964a.pp b/tests/webtbs/tw3964a.pp
index 813ff4f4ec..fbaeef8f31 100644
--- a/tests/webtbs/tw3964a.pp
+++ b/tests/webtbs/tw3964a.pp
@@ -1,6 +1,6 @@
 { %norun }
 { %needlibrary }
-{ %target=linux }
+{ %target=linux,haiku }
 {$mode objfpc}
 library tw3964a;
 
diff --git a/tests/webtbs/tw3964b.pp b/tests/webtbs/tw3964b.pp
index ab556a1b9a..3b61411205 100644
--- a/tests/webtbs/tw3964b.pp
+++ b/tests/webtbs/tw3964b.pp
@@ -1,5 +1,5 @@
 { %needlibrary }
-{ %target=linux }
+{ %target=linux,haiku }
 {$mode objfpc}
 
 {$linklib tw3964a}
diff --git a/tests/webtbs/tw6586a.pp b/tests/webtbs/tw6586a.pp
index 4d5516bc4e..762b1843a4 100644
--- a/tests/webtbs/tw6586a.pp
+++ b/tests/webtbs/tw6586a.pp
@@ -1,4 +1,4 @@
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 { %needlibrary }
 { %norun }
 
diff --git a/tests/webtbs/tw6586b.pp b/tests/webtbs/tw6586b.pp
index a726f425ac..831567d071 100644
--- a/tests/webtbs/tw6586b.pp
+++ b/tests/webtbs/tw6586b.pp
@@ -1,4 +1,4 @@
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 { %needlibrary }
 { %delfiles=tw6586a }
 
diff --git a/tests/webtbs/tw6687.pp b/tests/webtbs/tw6687.pp
index e7f4480be0..5b86ee4ba0 100644
--- a/tests/webtbs/tw6687.pp
+++ b/tests/webtbs/tw6687.pp
@@ -1,5 +1,5 @@
 { %cpu=i386 }
-{ %target=win32,linux,freebsd }
+{ %target=win32,linux,freebsd,haiku }
 
 {$ifdef fpc}
 {$mode delphi}
diff --git a/tests/webtbs/tw6822c.pp b/tests/webtbs/tw6822c.pp
index fce8b240da..db7f538740 100644
--- a/tests/webtbs/tw6822c.pp
+++ b/tests/webtbs/tw6822c.pp
@@ -1,4 +1,4 @@
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 uses
   SysUtils;
 
diff --git a/tests/webtbs/tw7808.pp b/tests/webtbs/tw7808.pp
index a6484b529a..4856e8866c 100644
--- a/tests/webtbs/tw7808.pp
+++ b/tests/webtbs/tw7808.pp
@@ -1,5 +1,5 @@
 { %cpu=i386 }
-{ %target=go32v2,linux,freebsd,win32}
+{ %target=go32v2,linux,freebsd,win32,haiku}
 { %opt=-Sew -vw }
 
 {$mode delphi}
diff --git a/tests/webtbs/tw7838a.pp b/tests/webtbs/tw7838a.pp
index a533a7f910..9153abea18 100644
--- a/tests/webtbs/tw7838a.pp
+++ b/tests/webtbs/tw7838a.pp
@@ -1,6 +1,6 @@
 { %norun }
 { %needlibrary }
-{ %target=win32,win64,wince,linux,android}
+{ %target=win32,win64,wince,linux,android,haiku}
 
 library tw7838a;
 
diff --git a/tests/webtbs/tw7838b.pp b/tests/webtbs/tw7838b.pp
index 1f34da63ba..b927fffd16 100644
--- a/tests/webtbs/tw7838b.pp
+++ b/tests/webtbs/tw7838b.pp
@@ -1,4 +1,4 @@
-{ %target=win32,win64,linux,android}
+{ %target=win32,win64,linux,android,haiku}
 { %needlibrary }
 { %delfiles=tw7838a }
 
diff --git a/tests/webtbs/tw8155.pp b/tests/webtbs/tw8155.pp
index 8755ce3157..e5aa919e7b 100644
--- a/tests/webtbs/tw8155.pp
+++ b/tests/webtbs/tw8155.pp
@@ -1,5 +1,5 @@
 { %cpu=i386 }
-{ %target=win32,linux,freebsd }
+{ %target=win32,linux,freebsd,haiku }
 
 {$ifdef fpc}
 {$mode delphi}
diff --git a/tests/webtbs/tw8730a.pp b/tests/webtbs/tw8730a.pp
index e694441c13..f4c0a62a4c 100644
--- a/tests/webtbs/tw8730a.pp
+++ b/tests/webtbs/tw8730a.pp
@@ -1,6 +1,6 @@
 { %norun }
 { %needlibrary }
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 
 {$mode delphi}
 
diff --git a/tests/webtbs/tw8730b.pp b/tests/webtbs/tw8730b.pp
index 75c9cd8206..8fb0ab3bf0 100644
--- a/tests/webtbs/tw8730b.pp
+++ b/tests/webtbs/tw8730b.pp
@@ -1,5 +1,5 @@
 { %norun }
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 { %NEEDLIBRARY }
 
 {$mode delphi}
diff --git a/tests/webtbs/tw8730c.pp b/tests/webtbs/tw8730c.pp
index 87579534e6..bfa29a5c18 100644
--- a/tests/webtbs/tw8730c.pp
+++ b/tests/webtbs/tw8730c.pp
@@ -1,4 +1,4 @@
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 { %NEEDLIBRARY }
 
 {$mode delphi}
diff --git a/tests/webtbs/tw8730d.pp b/tests/webtbs/tw8730d.pp
index 5352e13dbe..6aafb070b4 100644
--- a/tests/webtbs/tw8730d.pp
+++ b/tests/webtbs/tw8730d.pp
@@ -1,4 +1,4 @@
-{ %target=darwin,linux,freebsd,solaris,beos,aix,android}
+{ %target=darwin,linux,freebsd,solaris,beos,aix,android,haiku}
 { %NEEDLIBRARY }
 { %delfiles=tw8730a tw8730b }
 
diff --git a/tests/webtbs/tw9089a.pp b/tests/webtbs/tw9089a.pp
index d8d4885715..fb49c48475 100644
--- a/tests/webtbs/tw9089a.pp
+++ b/tests/webtbs/tw9089a.pp
@@ -1,6 +1,6 @@
 { %norun }
 { %needlibrary }
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 
 library tw9089a;
 
diff --git a/tests/webtbs/tw9089b.pp b/tests/webtbs/tw9089b.pp
index 5871ffceb3..84cf0c5825 100644
--- a/tests/webtbs/tw9089b.pp
+++ b/tests/webtbs/tw9089b.pp
@@ -1,4 +1,4 @@
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 { %norun }
 { %needlibrary }
 
diff --git a/tests/webtbs/tw9089c.pp b/tests/webtbs/tw9089c.pp
index 7be33a61ca..dac1ab99ba 100644
--- a/tests/webtbs/tw9089c.pp
+++ b/tests/webtbs/tw9089c.pp
@@ -1,4 +1,4 @@
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 { %needlibrary }
 { %delfiles=tw9089a tw9089b }
 
diff --git a/tests/webtbs/tw9089d.pp b/tests/webtbs/tw9089d.pp
index b182daeade..26bb990771 100644
--- a/tests/webtbs/tw9089d.pp
+++ b/tests/webtbs/tw9089d.pp
@@ -1,4 +1,4 @@
-{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android }
+{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
 uses
   SysUtils;