浏览代码

* two extra FPIS added

marco 22 年之前
父节点
当前提交
2e9daf5cfa
共有 1 个文件被更改,包括 8 次插入1 次删除
  1. 8 1
      rtl/unix/bunxh.inc

+ 8 - 1
rtl/unix/bunxh.inc

@@ -108,6 +108,10 @@ Type TGrpArr = Array [0..0] of TGid;		{ C style array workarounds}
     Function  FPIsReg	   (m : TMode): Boolean;
     Function  FPIsFIFO	   (m : TMode): Boolean;
 
+// The following two are very common, but not POSIX.
+    Function FPISLNK       (m:TMode) : Boolean;
+    Function FPISSOCK      (m:TMode : Boolean;
+
     Function  wifexited    (Status : cInt): cInt;
     Function  wexitStatus  (Status : cInt): cInt;
     Function  wstopsig	   (Status : cInt): cInt;
@@ -118,7 +122,10 @@ Type TGrpArr = Array [0..0] of TGid;		{ C style array workarounds}
 
 {
   $Log$
-  Revision 1.5  2003-09-16 16:13:56  marco
+  Revision 1.6  2003-09-17 11:14:25  marco
+   * two extra FPIS added
+
+  Revision 1.5  2003/09/16 16:13:56  marco
    * fdset functions renamed to fp<posix name>
 
   Revision 1.4  2003/09/14 20:15:01  marco