Browse Source

* fixed the handling of OS_PAIR/OS_SPAIR-sized parameters in ncgutil.gen_load_cgpara_loc. This fixes 32-bit regvar'd parameters on i8086.

git-svn-id: trunk@26278 -
nickysn 11 years ago
parent
commit
420f30bacd
1 changed files with 0 additions and 1 deletions
  1. 0 1
      compiler/ncgutil.pas

+ 0 - 1
compiler/ncgutil.pas

@@ -1077,7 +1077,6 @@ implementation
                           gen_alloc_regloc(list,destloc);
                           cg.a_load_cgparaloc_anyreg(list,OS_INT,paraloc^,destloc.register,sizeof(aint));
                           unget_para(paraloc^.Next^);
-                          gen_alloc_regloc(list,destloc);
                           {$if defined(cpu16bitalu) or defined(cpu8bitalu)}
                             cg.a_load_cgparaloc_anyreg(list,OS_INT,paraloc^.Next^,GetNextReg(destloc.register),sizeof(aint));
                           {$else}