Browse Source

* tests part of Olivier Coursier's BeOS patch

git-svn-id: trunk@8397 -
florian 18 years ago
parent
commit
834ea1bec1

+ 4 - 0
.gitattributes

@@ -6413,6 +6413,10 @@ tests/test/cg/cdecl/taoc4.pp svneol=native#text/plain
 tests/test/cg/cdecl/taoc5.pp svneol=native#text/plain
 tests/test/cg/cdecl/taoc6.pp svneol=native#text/plain
 tests/test/cg/obj/amiga/m68k/ctest.o -text
+tests/test/cg/obj/beos/i386/ctest.o -text
+tests/test/cg/obj/beos/i386/tcext3.o -text
+tests/test/cg/obj/beos/i386/tcext4.o -text
+tests/test/cg/obj/beos/i386/tcext5.o -text
 tests/test/cg/obj/darwin/i386/ctest.o -text
 tests/test/cg/obj/darwin/i386/tcext3.o -text
 tests/test/cg/obj/darwin/i386/tcext4.o -text

BIN
tests/test/cg/obj/beos/i386/ctest.o


BIN
tests/test/cg/obj/beos/i386/tcext3.o


BIN
tests/test/cg/obj/beos/i386/tcext4.o


BIN
tests/test/cg/obj/beos/i386/tcext5.o


+ 5 - 0
tests/test/cg/tprintf.pp

@@ -10,6 +10,11 @@ uses
 {$define TEST_EXTENDED}
 {$endif FPC_HAS_TYPE_EXTENDED}
 
+{$ifdef beos}
+  {it seems that BeOS doesn't support extended...}
+  {$undef TEST_EXTENDED}
+{$endif beos}
+
 {$ifdef WINDOWS}
 const
 {$ifdef wince}

+ 5 - 0
tests/test/cg/tprintf2.pp

@@ -10,6 +10,11 @@ uses
 {$define TEST_EXTENDED}
 {$endif FPC_HAS_TYPE_EXTENDED}
 
+{$ifdef beos}
+  {it seems that BeOS doesn't support extended...}
+  {$undef TEST_EXTENDED}
+{$endif beos}
+
 {$ifdef WINDOWS}
 const
 {$ifdef wince}

+ 5 - 0
tests/test/cg/tprintf3.pp

@@ -11,6 +11,11 @@ uses
 {$define TEST_EXTENDED}
 {$endif FPC_HAS_TYPE_EXTENDED}
 
+{$ifdef beos}
+  {it seems that BeOS doesn't support extended...}
+  {$undef TEST_EXTENDED}
+{$endif beos}
+
 {$ifdef WINDOWS}
   { the msvcrt.dll doesn't support extended because MS-C doesn't }
   {$undef TEST_EXTENDED}

+ 10 - 0
tests/test/units/dos/tdos2.pp

@@ -245,8 +245,18 @@ Begin
  WriteLn('----------------------------------------------------------------------');
  WriteLn(' Note: GetTime should return the same value as the previous test.     ');
  WriteLn('----------------------------------------------------------------------');
+{$ifndef beos}
+ {This should be disabled under BeOS : maybe this is a BeOS bug (or a feature ?) 
+  in stime function.
+  When you set 36 hours, the time AND the date are changed
+  It seems it is a valid value under BeOS, but you have jump in the future :
+  36 hours in the future from the begining of the starting day, more or less
+  depending on your timezone.
+  For example in Paris, in summer (2 hours from GMT time zone),
+  this call set the clock to 14:<Minute>:<Second>:<Sec100> the next day !}
  SetTime(36,Minute,Second,Sec100);
  CheckDosError(0);
+{$endif}
  GetTime(Hour1,Minute1,Second1,Sec1001);
  CheckDosError(0);
  WriteLn('HH:MIN:SEC ',Hour1,':',Minute1,':',Second1);

+ 3 - 0
tests/utils/redir.pp

@@ -42,6 +42,9 @@ Interface
 {$ifdef BSD}
 {$define implemented}
 {$endif}
+{$ifdef BEOS}
+{$define implemented}
+{$endif}
 {$ifdef macos}
 {$define shell_implemented}
 {$endif}