git-svn-id: trunk@42940 -
@@ -24,8 +24,7 @@ unit avrsim;
procedure PASCALMAIN; external name 'PASCALMAIN';
- procedure _FPC_haltproc(exitcode : longint); public name '_haltproc'; noreturn;
-
+ procedure _FPC_haltproc; public name '_haltproc'; noreturn;
begin
EXITCODEREG:=exitcode;
HALTREQUEST:=1;