Browse Source

* added unixtype unit in addition to baseunix unit (currently baseunix contains all types of unixtype)

git-svn-id: trunk@11782 -
ivost 17 years ago
parent
commit
2439dbd5a6

+ 1 - 1
packages/fcl-async/src/unix/libasync.pp

@@ -39,7 +39,7 @@ type
 
 
 implementation
 implementation
 
 
-uses baseunix, Unix;
+uses unixtype, baseunix, Unix;
 
 
 const
 const
   MaxHandle = SizeOf(TFDSet) * 8 - 1;
   MaxHandle = SizeOf(TFDSet) * 8 - 1;

+ 1 - 1
packages/fcl-base/src/libtar.pp

@@ -95,7 +95,7 @@ USES
    Libc,		// MvdV: Nothing is used from this???
    Libc,		// MvdV: Nothing is used from this???
 {$ENDIF}
 {$ENDIF}
 {$ifdef Unix} 
 {$ifdef Unix} 
-  BaseUnix, Unix,
+  UnixType, BaseUnix, Unix,
 {$endif}
 {$endif}
 (*$IFDEF MSWINDOWS *)
 (*$IFDEF MSWINDOWS *)
    Windows,
    Windows,

+ 1 - 1
packages/fcl-fpcunit/src/digesttestreport.pp

@@ -108,7 +108,7 @@ implementation
 
 
 uses LibTar,
 uses LibTar,
 {$IFDEF UNIX}
 {$IFDEF UNIX}
-     Unix,BaseUnix,
+     UnixType,Unix,BaseUnix,
 {$ENDIF}
 {$ENDIF}
 {$IFDEF MSWINDOWS}
 {$IFDEF MSWINDOWS}
      windows,
      windows,

+ 2 - 0
packages/fcl-process/src/process.pp

@@ -145,6 +145,8 @@ Uses
 {$endif WINDOWS}
 {$endif WINDOWS}
 {$ifdef UNIX}
 {$ifdef UNIX}
 uses
 uses
+   ctypes,
+   UnixType,
    Unix,
    Unix,
    Baseunix;
    Baseunix;
 {$endif UNIX}
 {$endif UNIX}

+ 1 - 1
packages/fv/src/drivers.pas

@@ -86,7 +86,7 @@ USES
      {$ifdef VER1_0}
      {$ifdef VER1_0}
        linux,
        linux,
      {$else}
      {$else}
-       baseunix,unix,
+       unixtype,baseunix,unix,
      {$endif}
      {$endif}
    {$ENDIF}
    {$ENDIF}
 
 

+ 1 - 1
packages/gtk2/src/gtk2x11/gdk2x.pas

@@ -25,7 +25,7 @@ unit gdk2x;
 interface
 interface
 
 
 uses
 uses
-  Classes, SysUtils, Unix, BaseUnix, glib2, gdk2, XLib, X, XRender;
+  Classes, SysUtils, UnixType, Unix, BaseUnix, glib2, gdk2, XLib, X, XRender;
 
 
 {$ifdef FREEBSD}
 {$ifdef FREEBSD}
   {$linklib pthread}
   {$linklib pthread}

+ 1 - 1
packages/iconvenc/src/iconvenc.pas

@@ -22,7 +22,7 @@ interface
 {DEFINE LOADDYNAMIC}
 {DEFINE LOADDYNAMIC}
 
 
 uses
 uses
-  baseunix,
+  ctypes,unixtype,baseunix,
   {$ifdef LOADDYNAMIC}
   {$ifdef LOADDYNAMIC}
   dl,
   dl,
   {$endif}
   {$endif}

+ 1 - 1
packages/libxml/src/libxml2.pas

@@ -14,7 +14,7 @@ uses
   windows,
   windows,
 {$ENDIF}
 {$ENDIF}
 {$IFDEF UNIX}
 {$IFDEF UNIX}
-  baseunix,
+  unixtype,
 {$ENDIF}
 {$ENDIF}
   ctypes;
   ctypes;
 
 

+ 1 - 1
packages/pcap/src/pcap.pp

@@ -41,7 +41,7 @@ interface
 
 
 uses
 uses
   {$ifdef UNIX}
   {$ifdef UNIX}
-  BaseUnix,
+  UnixType,BaseUnix,
   {$endif}
   {$endif}
   {$ifdef Windows}
   {$ifdef Windows}
   WinSock, Windows,
   WinSock, Windows,

+ 3 - 3
packages/pthreads/src/pthreads.pp

@@ -25,16 +25,16 @@ uses initc,BaseUnix, unixtype;
 {$i pthrbsd.inc}
 {$i pthrbsd.inc}
 {$else}
 {$else}
  {$ifdef linux}
  {$ifdef linux}
- uses initc,unixtype;
+ uses initc, ctypes, unixtype;
  {$i pthrlinux.inc}
  {$i pthrlinux.inc}
  {$else}
  {$else}
 
 
   {$ifdef sunos}
   {$ifdef sunos}
-  uses initc,unixtype;
+  uses initc, ctypes, unixtype;
   {$i pthrsnos.inc}
   {$i pthrsnos.inc}
   {$else}
   {$else}
    {$ifdef beos}
    {$ifdef beos}
-   uses initc, baseunix, unixtype;
+   uses initc, ctypes, baseunix, unixtype;
    {$i pthrbeos.inc}
    {$i pthrbeos.inc}
    {$else}
    {$else}
     {$error operating system not detected}
     {$error operating system not detected}

+ 1 - 0
packages/sdl/src/sdl.pas

@@ -300,6 +300,7 @@ uses
 {$IFDEF UNIX}
 {$IFDEF UNIX}
   {$IFDEF FPC}
   {$IFDEF FPC}
   pthreads,
   pthreads,
+  unixtype,
   baseunix,
   baseunix,
   {$IFNDEF GP2X}    
   {$IFNDEF GP2X}    
   unix,
   unix,

+ 1 - 1
packages/users/src/grp.pp

@@ -3,7 +3,7 @@ unit grp;
 interface
 interface
 
 
 uses
 uses
-  initc,baseunix,ctypes;
+  initc,unixtype,baseunix,ctypes;
 
 
 {$IFDEF FPC}
 {$IFDEF FPC}
 {$PACKRECORDS C}
 {$PACKRECORDS C}

+ 1 - 1
packages/users/src/pwd.pp

@@ -3,7 +3,7 @@ unit pwd;
 interface
 interface
 
 
 uses
 uses
-  initc,baseunix,ctypes;
+  initc,unixtype,baseunix,ctypes;
 
 
 {$IFDEF FPC}
 {$IFDEF FPC}
 {$PACKRECORDS C}
 {$PACKRECORDS C}

+ 1 - 1
packages/users/src/users.pp

@@ -2,7 +2,7 @@ unit users;
 
 
 Interface
 Interface
 {$mode delphi}
 {$mode delphi}
-uses BaseUnix,pwd,grp, {$ifdef Linux} shadow,{$endif}SysUtils,Classes;
+uses UnixType,BaseUnix,pwd,grp, {$ifdef Linux} shadow,{$endif}SysUtils,Classes;
 
 
 Type
 Type
   EUserLookupError = Class(Exception);
   EUserLookupError = Class(Exception);