瀏覽代碼

* added O_CLOEXEC

git-svn-id: trunk@38100 -
michael 7 年之前
父節點
當前提交
94b6fe6ad3
共有 1 個文件被更改,包括 3 次插入0 次删除
  1. 3 0
      rtl/linux/linux.pp

+ 3 - 0
rtl/linux/linux.pp

@@ -29,6 +29,9 @@ interface
 uses
   BaseUnix, unixtype;
 
+Const
+  O_CLOEXEC = $80000;
+  
 type
   TSysInfo = record
     uptime: clong;                     //* Seconds since boot */