Browse Source

* decstack after call_indirect

git-svn-id: branches/wasm@48265 -
nickysn 4 years ago
parent
commit
17bfdee158
1 changed files with 1 additions and 0 deletions
  1. 1 0
      compiler/wasm32/hlcgcpu.pas

+ 1 - 0
compiler/wasm32/hlcgcpu.pas

@@ -354,6 +354,7 @@ implementation
     begin
       a_load_reg_stack(list, ptrsinttype, reg);
       current_asmdata.CurrAsmList.Concat(taicpu.op_functype(a_call_indirect,tcpuprocdef(pd).create_functype));
+      decstack(list,1);
       result:=hlcg.get_call_result_cgpara(pd, nil);
     end;