mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-09 22:06:08 +02:00
* fix encoding for save_freg_x
This commit is contained in:
parent
959804798c
commit
43d1036b3a
@ -308,7 +308,7 @@ unit agcpugas;
|
||||
begin
|
||||
check_offset(seh.data.offset,256);
|
||||
check_reg(seh.data.reg,R_MMREGISTER,min_mm_reg);
|
||||
writeword($CE00 or ((getsupreg(seh.data.reg)-min_mm_reg) shl 5) or ((seh.data.offset shr 3)-1));
|
||||
writeword($DE00 or ((getsupreg(seh.data.reg)-min_mm_reg) shl 5) or ((seh.data.offset shr 3)-1));
|
||||
end;
|
||||
ash_savefregp:
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user