浏览代码

+ Removed HASGLOBALPROPERTY define

git-svn-id: trunk@247 -
michael 20 年之前
父节点
当前提交
a44d5f5c13
共有 3 个文件被更改,包括 0 次插入6 次删除
  1. 0 2
      rtl/netware/initc.pp
  2. 0 2
      rtl/netwlibc/initc.pp
  3. 0 2
      rtl/unix/initc.pp

+ 0 - 2
rtl/netware/initc.pp

@@ -22,9 +22,7 @@ type libcint   = longint;
 function fpgetCerrno:libcint;
 function fpgetCerrno:libcint;
 procedure fpsetCerrno(err:libcint);
 procedure fpsetCerrno(err:libcint);
 
 
-{$ifdef HASGLOBALPROPERTY}
 property cerrno:libcint read fpgetCerrno write fpsetcerrno;
 property cerrno:libcint read fpgetCerrno write fpsetcerrno;
-{$endif HASGLOBALPROPERTY}
 
 
 implementation
 implementation
 
 

+ 0 - 2
rtl/netwlibc/initc.pp

@@ -22,9 +22,7 @@ type libcint   = longint;
 function fpgetCerrno:libcint;
 function fpgetCerrno:libcint;
 procedure fpsetCerrno(err:libcint);
 procedure fpsetCerrno(err:libcint);
 
 
-{$ifdef HASGLOBALPROPERTY}
 property cerrno:libcint read fpgetCerrno write fpsetcerrno;
 property cerrno:libcint read fpgetCerrno write fpsetcerrno;
-{$endif HASGLOBALPROPERTY}
 
 
 implementation
 implementation
 
 

+ 0 - 2
rtl/unix/initc.pp

@@ -23,9 +23,7 @@ type libcint   = longint;
 function fpgetCerrno:libcint;
 function fpgetCerrno:libcint;
 procedure fpsetCerrno(err:libcint);
 procedure fpsetCerrno(err:libcint);
 
 
-{$ifdef HASGLOBALPROPERTY}
 property cerrno:libcint read fpgetCerrno write fpsetcerrno;
 property cerrno:libcint read fpgetCerrno write fpsetcerrno;
-{$endif HASGLOBALPROPERTY}
 
 
 const clib = 'c';
 const clib = 'c';