paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-02-04 07:14:50 +01:00
Code Issues Packages Projects Releases Wiki Activity

removed types already in system unit

Browse Source
This commit is contained in:
peter 2004-11-05 12:48:18 +00:00
parent 7662aa905d
commit 7aeee5a7e6
1 changed files with 4 additions and 37 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
fv/fvcommon.pas
View File

@ -139,42 +139,6 @@ TYPE
Sw_Integer = LongInt; { Long integer now }
{$ENDIF}
{---------------------------------------------------------------------------}
{ FILE HANDLE SIZE }
{---------------------------------------------------------------------------}
TYPE
{$IFDEF OS_DOS} { DOS DEFINITION }
THandle = Integer; { Handles are 16 bits }
{$ENDIF}
{$IFDEF OS_ATARI} { ATARI DEFINITION }
THandle = Integer; { Handles are 16 bits }
{$ENDIF}
{$IFDEF OS_UNIX} { LINUX DEFINITIONS }
{ values are words, though the OS calls return 32-bit values }
{ to check (CEC) }
THandle = LongInt; { Simulated 32 bits }
{$ENDIF}
{$IFDEF OS_AMIGA} { AMIGA DEFINITIONS }
THandle = LongInt; { Handles are 32 bits }
{$ENDIF}
{$IFDEF OS_WINDOWS} { WIN/NT DEFINITIONS }
THandle = Windows.THandle; { Can be either }
{$ENDIF}
{$IFDEF OS_OS2} { OS2 DEFINITIONS }
THandle = sw_Integer; { Can be either }
{$ENDIF}
{$IFDEF OS_MAC} { MACINTOSH DEFINITIONS }
THandle = LongInt; { Handles are 32 bits }
{$ENDIF}
{---------------------------------------------------------------------------}
{ POINTERS TO STANDARD DATA TYPES }
{---------------------------------------------------------------------------}
TYPE
PByte = ^Byte; { Pointer to byte }
PWord = ^Word; { Pointer to word }
PLongint = ^Longint; { Pointer to longint }
{---------------------------------------------------------------------------}
{ GENERAL ARRAYS }
{---------------------------------------------------------------------------}
@ -408,7 +372,10 @@ END;
END.
{
$Log$
Revision 1.6 2004-11-02 23:53:19 peter
Revision 1.7 2004-11-05 12:48:18 peter
removed types already in system unit
Revision 1.6 2004/11/02 23:53:19 peter
* fixed crashes with ide and 1.9.x
Revision 1.5 2003/06/05 14:45:06 peter