|
@@ -24,7 +24,9 @@ type libcint = longint;
|
|
|
function fpgetCerrno:libcint;
|
|
|
procedure fpsetCerrno(err:libcint);
|
|
|
|
|
|
+{$ifndef ver1_0}
|
|
|
property cerrno:libcint read fpgetCerrno write fpsetcerrno;
|
|
|
+{$endif}
|
|
|
|
|
|
implementation
|
|
|
// hasn't been divided up in .inc's, because I first want to see hoe
|
|
@@ -77,7 +79,10 @@ end;
|
|
|
end.
|
|
|
{
|
|
|
$Log$
|
|
|
- Revision 1.6 2003-12-10 17:06:19 marco
|
|
|
+ Revision 1.7 2003-12-10 17:14:27 marco
|
|
|
+ * property support under ifndef ver1_0
|
|
|
+
|
|
|
+ Revision 1.6 2003/12/10 17:06:19 marco
|
|
|
* property support used.
|
|
|
|
|
|
Revision 1.5 2003/12/10 14:59:49 marco
|