mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-09 19:59:50 +01:00
* updated to show better the problem
This commit is contained in:
parent
d898286434
commit
71224455b8
@ -2,16 +2,16 @@ unit test;
|
||||
|
||||
interface
|
||||
|
||||
procedure x;
|
||||
procedure x(l : longint);
|
||||
|
||||
implementation
|
||||
|
||||
procedure crash;
|
||||
|
||||
begin
|
||||
x; { called with pascal calling conventions }
|
||||
x(1234); { called with pascal calling conventions }
|
||||
end;
|
||||
|
||||
procedure x;external;cdecl;
|
||||
procedure x(l : longint);external;cdecl;
|
||||
|
||||
end.
|
||||
|
||||
Loading…
Reference in New Issue
Block a user