paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 09:09:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ GlobalNameSpace

Browse Source
This commit is contained in:
florian 2005-02-06 20:31:35 +00:00
parent acc34b08cd
commit c8d20e65c4
1 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
rtl/objpas/sysutils/systhrdh.inc
View File

@ -16,10 +16,11 @@
type type
IReadWriteSync = interface IReadWriteSync = interface
procedure BeginRead; ['{7B108C52-1D8F-4CDB-9CDF-57E071193D3F}']
procedure EndRead; procedure BeginRead;
procedure BeginWrite; procedure EndRead;
procedure EndWrite; function BeginWrite : boolean;
procedure EndWrite;
end; end;
{$endif HASINTF} {$endif HASINTF}
@ -31,7 +32,10 @@ function InterLockedExchangeAdd (var Target: longint;Source : longint) : longint
{ {
$Log$ $Log$
Revision 1.2 2004-03-05 12:17:50 marco Revision 1.3 2005-02-06 20:31:35 florian
+ GlobalNameSpace
Revision 1.2 2004/03/05 12:17:50 marco
* interlocked* changed to longints, including winapi. (which was a bug) * interlocked* changed to longints, including winapi. (which was a bug)
Revision 1.1 2003/10/06 21:01:06 peter Revision 1.1 2003/10/06 21:01:06 peter