浏览代码

* hopefully fixed beos compilation after r12630 (it doesn't have flock)

git-svn-id: trunk@12631 -
Jonas Maebe 16 年之前
父节点
当前提交
57ff980bc3
共有 1 个文件被更改,包括 2 次插入0 次删除
  1. 2 0
      rtl/unix/sysutils.pp

+ 2 - 0
rtl/unix/sysutils.pp

@@ -182,6 +182,7 @@ var
   lockres: cint;
 begin
   DoFileLocking:=Handle;
+{$ifndef beos}
   if (Handle>=0) then
     begin
       case (mode and (fmShareExclusive or fmShareDenyWrite or fmShareDenyRead)) of
@@ -213,6 +214,7 @@ begin
           exit;
         end;
     end;
+{$endif not beos}
 end;