mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-13 21:11:23 +02:00
* added unixtype unit in addition to baseunix unit (currently baseunix contains all types of unixtype)
git-svn-id: trunk@11782 -
This commit is contained in:
parent
cd6b57c733
commit
2439dbd5a6
@ -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;
|
||||||
|
@ -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,
|
||||||
|
@ -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,
|
||||||
|
@ -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}
|
||||||
|
@ -86,7 +86,7 @@ USES
|
|||||||
{$ifdef VER1_0}
|
{$ifdef VER1_0}
|
||||||
linux,
|
linux,
|
||||||
{$else}
|
{$else}
|
||||||
baseunix,unix,
|
unixtype,baseunix,unix,
|
||||||
{$endif}
|
{$endif}
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
|
||||||
|
@ -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}
|
||||||
|
@ -22,7 +22,7 @@ interface
|
|||||||
{DEFINE LOADDYNAMIC}
|
{DEFINE LOADDYNAMIC}
|
||||||
|
|
||||||
uses
|
uses
|
||||||
baseunix,
|
ctypes,unixtype,baseunix,
|
||||||
{$ifdef LOADDYNAMIC}
|
{$ifdef LOADDYNAMIC}
|
||||||
dl,
|
dl,
|
||||||
{$endif}
|
{$endif}
|
||||||
|
@ -14,7 +14,7 @@ uses
|
|||||||
windows,
|
windows,
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
{$IFDEF UNIX}
|
{$IFDEF UNIX}
|
||||||
baseunix,
|
unixtype,
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
ctypes;
|
ctypes;
|
||||||
|
|
||||||
|
@ -41,7 +41,7 @@ interface
|
|||||||
|
|
||||||
uses
|
uses
|
||||||
{$ifdef UNIX}
|
{$ifdef UNIX}
|
||||||
BaseUnix,
|
UnixType,BaseUnix,
|
||||||
{$endif}
|
{$endif}
|
||||||
{$ifdef Windows}
|
{$ifdef Windows}
|
||||||
WinSock, Windows,
|
WinSock, Windows,
|
||||||
|
@ -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}
|
||||||
|
@ -300,6 +300,7 @@ uses
|
|||||||
{$IFDEF UNIX}
|
{$IFDEF UNIX}
|
||||||
{$IFDEF FPC}
|
{$IFDEF FPC}
|
||||||
pthreads,
|
pthreads,
|
||||||
|
unixtype,
|
||||||
baseunix,
|
baseunix,
|
||||||
{$IFNDEF GP2X}
|
{$IFNDEF GP2X}
|
||||||
unix,
|
unix,
|
||||||
|
@ -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}
|
||||||
|
@ -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}
|
||||||
|
@ -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);
|
||||||
|
Loading…
Reference in New Issue
Block a user