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

+ missing cdecl for procedure variables added

Browse Source
This commit is contained in:
florian 2004-02-04 23:01:28 +00:00
parent 63f2dfc2dd
commit 261f3e4927
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
packages/extra/x11/xlib.pp
View File

@ -233,10 +233,10 @@ type
create_image : function (para1:PXDisplay; para2:PVisual; para3:dword; para4:longint; para5:longint;
para6:Pchar; para7:dword; para8:dword; para9:longint; para10:longint):PXImage;cdecl;
destroy_image : function (para1:PXImage):longint;
get_pixel : function (para1:PXImage; para2:longint; para3:longint):dword;
put_pixel : function (para1:PXImage; para2:longint; para3:longint; para4:dword):longint;
sub_image : function (para1:PXImage; para2:longint; para3:longint; para4:dword; para5:dword):PXImage;
add_pixel : function (para1:PXImage; para2:longint):longint;
get_pixel : function (para1:PXImage; para2:longint; para3:longint):dword;cdecl;
put_pixel : function (para1:PXImage; para2:longint; para3:longint; para4:dword):longint;cdecl;
sub_image : function (para1:PXImage; para2:longint; para3:longint; para4:dword; para5:dword):PXImage;cdecl;
add_pixel : function (para1:PXImage; para2:longint):longint;cdecl;
end;
end;
@ -374,7 +374,7 @@ type
private14 : TXPointer;
max_request_size : dword;
db : PXrmHashBucketRec;
private15 : function (para1:PXDisplay):longint;
private15 : function (para1:PXDisplay):longint;cdecl;
display_name : Pchar;
default_screen : longint;
nscreens : longint;
@ -2088,4 +2088,4 @@ end;
{$endif MACROS}
end.
end.