فهرست منبع

* mmap2 expects that offset is divided by 4096

git-svn-id: trunk@44198 -
(cherry picked from commit 17158c3587ef077eade579f1414b5ac98f89ed47)
florian 5 سال پیش
والد
کامیت
655352f0e9
1فایلهای تغییر یافته به همراه2 افزوده شده و 2 حذف شده
  1. 2 2
      rtl/linux/ossysc.inc

+ 2 - 2
rtl/linux/ossysc.inc

@@ -572,11 +572,11 @@ end;
 begin
   {$if sizeof(TSysParam)>=sizeof(off_t)}
   Fpmmap:= pointer(do_syscall(syscall_nr_mmap2,TSysParam(adr),TSysParam(len),
-    TSysParam(prot),TSysParam(flags),TSysParam(fd),TSysParam(off)));
+    TSysParam(prot),TSysParam(flags),TSysParam(fd),TSysParam(off div 4096)));
   {$else off_t is larger than TsysParam }
   {$message warning need mmap64 syscall, hi(off) not used}
   Fpmmap:= pointer(do_syscall(syscall_nr_mmap2,TSysParam(adr),TSysParam(len),
-    TSysParam(prot),TSysParam(flags),TSysParam(fd),TSysParam(lo(off))));
+    TSysParam(prot),TSysParam(flags),TSysParam(fd),TSysParam(lo(off div 4096))));
  {$endif}
 end;
 {$else MMAP2}