git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@7616 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Xavier Leroy 2006-09-19 12:41:12 +00:00
parent 09ec1094c6
commit 77149d879c
1 changed files with 1 additions and 1 deletions

View File

@ -129,7 +129,7 @@ void caml_ba_unmap_file(void * addr, uintnat len)
uintnat delta;
GetSystemInfo(&sysinfo);
delta = (uintnat) (startpos % sysinfo.dwPageSize);
delta = (uintnat) addr % sysinfo.dwPageSize;
UnmapViewOfFile((void *)((uintnat)addr - delta));
}