|
@@ -1003,6 +1003,10 @@ implementation
|
|
a_load_ref_reg(list,OS_8,OS_32,href,tmpreg2);
|
|
a_load_ref_reg(list,OS_8,OS_32,href,tmpreg2);
|
|
list.concat(taicpu.op_reg_reg_const_const(A_BFI,tmpreg,tmpreg2,i*8,8));
|
|
list.concat(taicpu.op_reg_reg_const_const(A_BFI,tmpreg,tmpreg2,i*8,8));
|
|
end;
|
|
end;
|
|
|
|
+ if (tosize in [OS_S8,OS_S16]) then
|
|
|
|
+ list.concat(taicpu.op_reg_reg(A_SXTH,tmpreg,tmpreg))
|
|
|
|
+ else if (tosize in [OS_8,OS_16]) then
|
|
|
|
+ list.concat(taicpu.op_reg_reg(A_UXTH,tmpreg,tmpreg));
|
|
a_load_reg_reg(list,fromsize,tosize,tmpreg,register);
|
|
a_load_reg_reg(list,fromsize,tosize,tmpreg,register);
|
|
end;
|
|
end;
|
|
end;
|
|
end;
|