Browse Source

* moved fpgeterrno/fpseterrno declarations to before their actual usage

Jonas Maebe 21 years ago
parent
commit
5c5c449ecf
2 changed files with 14 additions and 8 deletions
  1. 10 5
      rtl/bsd/baseunix.pp
  2. 4 3
      rtl/bsd/bunxmain.inc

+ 10 - 5
rtl/bsd/baseunix.pp

@@ -53,9 +53,7 @@ property errno : cint read fpgeterrno write fpseterrno;
 
 implementation
 
-
-{$i bunxmain.inc}	{ implementation}
-{$i bunxovl.inc}	{ redefs and overloads implementation}
+Uses Sysctl;
 
 {$ifndef ver1_0}
 function fpgeterrno:longint; external name 'FPC_SYS_GETERRNO';
@@ -77,11 +75,18 @@ begin
 end;
 
 {$endif}
+
+{$i bunxmain.inc}	{ implementation}
+{$i bunxovl.inc}	{ redefs and overloads implementation}
+
 end.
 
 {
   $Log$
-  Revision 1.9  2004-03-04 22:15:16  marco
+  Revision 1.10  2004-05-31 18:03:51  jonas
+    * moved fpgeterrno/fpseterrno declarations to before their actual usage
+
+  Revision 1.9  2004/03/04 22:15:16  marco
    * UnixType changes. Please report problems to me.
 
   Revision 1.8  2004/01/04 21:04:08  jonas
@@ -115,4 +120,4 @@ end.
   Revision 1.2  2002/11/14 12:17:28  marco
    * for now.
 
-}
+}

+ 4 - 3
rtl/bsd/bunxmain.inc

@@ -19,8 +19,6 @@
  ****************************************************************************
 }
 
-Uses Sysctl;
-
 {$I ostypes.inc}
 {$I bunxmacr.inc}
 
@@ -39,7 +37,10 @@ Uses Sysctl;
 
 {
  $Log$
- Revision 1.3  2003-12-30 12:26:21  marco
+ Revision 1.4  2004-05-31 18:03:51  jonas
+   * moved fpgeterrno/fpseterrno declarations to before their actual usage
+
+ Revision 1.3  2003/12/30 12:26:21  marco
   * FPC_USE_LIBC
 
  Revision 1.2  2003/06/01 16:35:27  marco