paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-18 20:29:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

from patch #20657 removes some compiler warnings

Browse Source 
git-svn-id: trunk@33437 -
This commit is contained in:
sekelsenmat 2011-11-09 15:23:10 +00:00
parent 3a74265653
commit eca7c0b024
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/lazutils/lazutf8sysutils.pas
View File

@ -46,7 +46,7 @@ Const
D1 = 146097;
D2 =1721119;
Procedure JulianToGregorian(JulianDN:LongInt;Var Year,Month,Day:Word);
Procedure JulianToGregorian(JulianDN:LongInt;out Year,Month,Day:Word);
Var
YYear,XYear,Temp,TempMonth : LongInt;
Begin
@ -69,7 +69,7 @@ end;
Procedure EpochToLocal(epoch:longint;var year,month,day,hour,minute,second:Word);
Procedure EpochToLocal(epoch:longint;out year,month,day,hour,minute,second:Word);
{
Transforms Epoch time into local time (hour, minute,seconds)
}