|
@@ -644,11 +644,8 @@ implementation
|
|
|
a_load_reg_stack(list,size,reg);
|
|
|
if tmpref.base<>NR_EVAL_STACK_BASE then
|
|
|
a_load_ref_stack(list,size,tmpref,prepare_stack_for_ref(list,tmpref,false))
|
|
|
- else begin
|
|
|
- // todo: need a swap operation?
|
|
|
- //list.concat(taicpu.op_none(a_swap));
|
|
|
- Internalerror(2019083003);
|
|
|
- end;
|
|
|
+ else
|
|
|
+ cmp_op:=swap_opcmp(cmp_op);
|
|
|
a_cmp_stack_stack(list,size,cmp_op);
|
|
|
end;
|
|
|
|