Fix initial Time() value and fix GetTimeOfDay on Windows. Thanks Oleg.

This commit is contained in:
David Brown 2016-07-22 14:25:39 +01:00
parent c07485d5a4
commit d9c319ef3a
2 changed files with 14 additions and 9 deletions

View file

@ -537,7 +537,7 @@ BEGIN
HaltCode := -128;
HaltHandler := NIL;
TimeStart := Time();
TimeStart := 0; TimeStart := Time();
CWD := ""; getcwd(CWD);
PID := getpid();
@ -548,4 +548,3 @@ BEGIN
nl[0] := 0AX; (* LF *)
nl[1] := 0X;
END Platform.