fix small problem introduced by merging 4.02

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@16219 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Damien Doligez 2015-07-20 11:09:25 +00:00
parent 4b83d53fbc
commit 392a41b441
1 changed files with 1 additions and 1 deletions

View File

@ -25,6 +25,6 @@ CAMLprim value unix_gettimeofday(value unit)
FILETIME ft;
double tm;
GetSystemTimeAsFileTime(&ft);
tm = *(uint64 *)&ft - epoch_ft; /* shift to Epoch-relative time */
tm = *(uint64_t *)&ft - epoch_ft; /* shift to Epoch-relative time */
return copy_double(tm * 1e-7); /* tm is in 100ns */
}