|
@@ -387,6 +387,7 @@ implementation
|
|
|
paramanager.getintparaloc(search_system_proc('fpc_handleerror'),1,paraloc1);
|
|
|
cg.a_load_const_cgpara(current_asmdata.CurrAsmList,OS_S32,aint(200),paraloc1);
|
|
|
paramanager.freecgpara(current_asmdata.CurrAsmList,paraloc1);
|
|
|
+ cg.a_call_name(current_asmdata.CurrAsmList,'FPC_HANDLEERROR',false);
|
|
|
paraloc1.done;
|
|
|
cg.a_label(current_asmdata.CurrAsmList,hl);
|
|
|
if nodetype = modn then
|