Pārlūkot izejas kodu

Fix tepoch1 test

git-svn-id: trunk@47297 -
ondrej 4 gadi atpakaļ
vecāks
revīzija
9b5d2322b6
2 mainītis faili ar 3 papildinājumiem un 3 dzēšanām
  1. 1 1
      .gitattributes
  2. 2 2
      tests/test/units/unix/tepoch1.pp

+ 1 - 1
.gitattributes

@@ -16159,7 +16159,7 @@ tests/test/units/sysutils/twstralloc.pp svneol=native#text/plain
 tests/test/units/sysutils/twstrcmp.pp svneol=native#text/plain
 tests/test/units/types/ttbitconverter.pp svneol=native#text/pascal
 tests/test/units/ucomplex/tcsqr1.pp svneol=native#text/pascal
-tests/test/units/unixutil/tepoch1.pp svneol=native#text/pascal
+tests/test/units/unix/tepoch1.pp svneol=native#text/pascal
 tests/test/units/variants/tcustomvariant.pp svneol=native#text/plain
 tests/test/units/variants/tvararrayofintf.pp svneol=native#text/plain
 tests/test/units/variants/tw26370.pp svneol=native#text/plain

+ 2 - 2
tests/test/units/unixutil/tepoch1.pp → tests/test/units/unix/tepoch1.pp

@@ -1,10 +1,10 @@
 { %target=linux,freebsd,openbsd,aix,darwin,netbsd }
 uses
-  unixutil;
+  unix;
 var
   y,m,d,h,mn,s : word;
 begin
-  EpochToLocal(15796372693,y,m,d,h,mn,s);
+  EpochToUniversal(15796372693,y,m,d,h,mn,s);
   if (y<>2470) or (m<>7) or (d<>26) or (h<>9) or (mn<>18) or (s<>13) then
     halt(1);
   EpochToLocal(LocalToEpoch(2345,12,12,4,45,49),y,m,d,h,mn,s);