paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-03 11:37:14 +01:00
Code Issues Packages Projects Releases Wiki Activity

* moves the alias "TTime = time_t" from ptypes.inc to unixtype.pp.

Browse Source 
This means it is not aliased in the body of the system unit (which causes
  trouble with the delphi type of the same name), but baseunix/unix/unixtype
  will containue to export the type.

git-svn-id: trunk@14584 -
This commit is contained in:
marco 2010-01-09 16:05:42 +00:00
parent 77fd8bacc7
commit 5d87461507
9 changed files with 17 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
rtl/beos/ptypes.inc
View File

@ -85,8 +85,9 @@ type
TClock = clock_t; TClock = clock_t;
pClock = ^clock_t; pClock = ^clock_t;
time_t = clong; { used for returning the time } time_t = clong; { used for returning the time }/
TTime = time_t;
// TTime = time_t; // Not allowed in system unit, -> unixtype
pTime = ^time_t; pTime = ^time_t;
ptime_t = ^time_t; ptime_t = ^time_t;

3
rtl/darwin/ptypes.inc
View File

@ -77,7 +77,8 @@ type
pClock = ^clock_t; pClock = ^clock_t;
time_t = clong; { used for returning the time } time_t = clong; { used for returning the time }
TTime = time_t; // TTime = time_t; // Not allowed in system unit, -> unixtype
pTime = ^time_t; pTime = ^time_t;
ptime_t = ^time_t; ptime_t = ^time_t;

4
rtl/freebsd/ptypes.inc
View File

@ -94,7 +94,9 @@ type
time_t = clong; { used for returning the time, clong time_t = clong; { used for returning the time, clong
is 64-bit on AMD64} is 64-bit on AMD64}
TTime = time_t;
// TTime = time_t; // Not allowed in system unit, -> unixtype
pTime = ^time_t; pTime = ^time_t;
ptime_t = ^time_t; ptime_t = ^time_t;

2
rtl/haiku/ptypes.inc
View File

@ -86,7 +86,7 @@ type
pClock = ^clock_t; pClock = ^clock_t;
time_t = clong; { used for returning the time } time_t = clong; { used for returning the time }
TTime = time_t; // TTime = time_t; // Not allowed in system unit, -> unixtype
pTime = ^time_t; pTime = ^time_t;
ptime_t = ^time_t; ptime_t = ^time_t;

3
rtl/linux/ptypes.inc
View File

@ -98,7 +98,8 @@ Type
pSSize = ^ssize_t; pSSize = ^ssize_t;
TClock = clock_t; TClock = clock_t;
pClock = ^clock_t; pClock = ^clock_t;
TTime = time_t; // TTime = time_t; // Not allowed in system unit, -> unixtype
pTime = ^time_t; pTime = ^time_t;
ptime_t = ^time_t; ptime_t = ^time_t;

2
rtl/netbsd/ptypes.inc
View File

@ -80,7 +80,7 @@ type
pClock = ^clock_t; pClock = ^clock_t;
time_t = clong; { used for returning the time } time_t = clong; { used for returning the time }
TTime = time_t; // TTime = time_t; // Not allowed in system unit, -> unixtype
pTime = ^time_t; pTime = ^time_t;
ptime_t = ^time_t; ptime_t = ^time_t;

2
rtl/openbsd/ptypes.inc
View File

@ -70,7 +70,7 @@ type
pClock = ^clock_t; pClock = ^clock_t;
time_t = clong; { used for returning the time } time_t = clong; { used for returning the time }
TTime = time_t; // TTime = time_t; // Not allowed in system unit, -> unixtype
pTime = ^time_t; pTime = ^time_t;
ptime_t = ^time_t; ptime_t = ^time_t;

3
rtl/solaris/ptypes.inc
View File

@ -93,7 +93,8 @@ Type
pSSize = ^ssize_t; pSSize = ^ssize_t;
TClock = clock_t; TClock = clock_t;
pClock = ^clock_t; pClock = ^clock_t;
TTime = time_t; // TTime = time_t; // Not allowed in system unit, -> unixtype
pTime = ^time_t; pTime = ^time_t;
ptime_t = ^time_t; ptime_t = ^time_t;
clockid_t = cint; clockid_t = cint;

2
rtl/unix/unixtype.pp
View File

@ -20,6 +20,8 @@ Interface
{$i ptypes.inc} {$i ptypes.inc}
Type
TTime = time_t;
Implementation Implementation
End. End.