ソースを参照

* fix for the WASI datetime to epoch conversion

Nikolay Nikolov 3 年 前
コミット
099a927331
2 ファイル変更2 行追加2 行削除
  1. 1 1
      rtl/wasi/dos.pp
  2. 1 1
      rtl/wasi/sysutils.pp

+ 1 - 1
rtl/wasi/dos.pp

@@ -184,7 +184,7 @@ const
   days_in_month: array [boolean, 1..12] of Byte =
   days_in_month: array [boolean, 1..12] of Byte =
     ((31,28,31,30,31,30,31,31,30,31,30,31),
     ((31,28,31,30,31,30,31,31,30,31,30,31),
      (31,29,31,30,31,30,31,31,30,31,30,31));
      (31,29,31,30,31,30,31,31,30,31,30,31));
-  days_before_month: array [boolean, 1..12] of Byte =
+  days_before_month: array [boolean, 1..12] of Word =
     ((0,
     ((0,
       0+31,
       0+31,
       0+31+28,
       0+31+28,

+ 1 - 1
rtl/wasi/sysutils.pp

@@ -57,7 +57,7 @@ const
   days_in_month: array [boolean, 1..12] of Byte =
   days_in_month: array [boolean, 1..12] of Byte =
     ((31,28,31,30,31,30,31,31,30,31,30,31),
     ((31,28,31,30,31,30,31,31,30,31,30,31),
      (31,29,31,30,31,30,31,31,30,31,30,31));
      (31,29,31,30,31,30,31,31,30,31,30,31));
-  days_before_month: array [boolean, 1..12] of Byte =
+  days_before_month: array [boolean, 1..12] of Word =
     ((0,
     ((0,
       0+31,
       0+31,
       0+31+28,
       0+31+28,