fix small problem introduced by merging 4.02
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@16219 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02master
parent
4b83d53fbc
commit
392a41b441
|
@ -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 */
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue