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

* typo ($ifdef window -> $ifdef windows)

Browse Source 
git-svn-id: trunk@19275 -
This commit is contained in:
sergei 2011-09-28 22:10:22 +00:00
parent b93f4b8096
commit d5b8210359
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/webtbs/tw19180.pp
View File

@ -28,7 +28,7 @@ type
public public
constructor Create(const AController: TObject); constructor Create(const AController: TObject);
function QueryInterface(constref IID: TGUID; out Intf): HResult; virtual; {$ifdef window}stdcall{$else}cdecl{$endif}; function QueryInterface(constref IID: TGUID; out Intf): HResult; virtual; {$ifdef windows}stdcall{$else}cdecl{$endif};
function _AddRef: LongInt; virtual; {$ifdef windows}stdcall{$else}cdecl{$endif}; function _AddRef: LongInt; virtual; {$ifdef windows}stdcall{$else}cdecl{$endif};
function _Release: LongInt; virtual; {$ifdef windows}stdcall{$else}cdecl{$endif}; function _Release: LongInt; virtual; {$ifdef windows}stdcall{$else}cdecl{$endif};