2
0
Эх сурвалжийг харах

* converted loading for fpc_catches parameter to hlcg

git-svn-id: trunk@32300 -
Jonas Maebe 9 жил өмнө
parent
commit
f0c6d40336
1 өөрчлөгдсөн 1 нэмэгдсэн , 1 устгасан
  1. 1 1
      compiler/ncgflw.pas

+ 1 - 1
compiler/ncgflw.pas

@@ -1230,7 +1230,7 @@ implementation
          pd:=search_system_proc('fpc_catches');
          reference_reset_symbol(href2,current_asmdata.RefAsmSymbol(excepttype.vmt_mangledname,AT_DATA),0,sizeof(pint));
          paramanager.getintparaloc(current_asmdata.CurrAsmList,pd,1,paraloc1);
-         cg.a_loadaddr_ref_cgpara(current_asmdata.CurrAsmList,href2,paraloc1);
+         hlcg.a_loadaddr_ref_cgpara(current_asmdata.CurrAsmList,excepttype.vmt_def,href2,paraloc1);
          paramanager.freecgpara(current_asmdata.CurrAsmList,paraloc1);
          fpc_catches_res:=hlcg.g_call_system_proc(current_asmdata.CurrAsmList,pd,[@paraloc1],nil);
          location_reset(fpc_catches_resloc,LOC_REGISTER,def_cgsize(fpc_catches_res.def));