mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-12-08 01:27:42 +01:00
* fixed regInInstruction to detect register usages in Ch_ALL
instructions whereby the registers are explicitly named in operands
(mainly for unsupported mmx/sse instructions)
git-svn-id: trunk@4240 -
This commit is contained in:
parent
6148aec213
commit
cf86412832
@ -838,6 +838,13 @@ begin
|
||||
(supreg in [RS_EAX,RS_EDX])
|
||||
else
|
||||
begin
|
||||
for opcount := 0 to p.ops-1 do
|
||||
if (p.oper[opCount]^.typ = top_ref) and
|
||||
reginref(supreg,p.oper[opcount]^.ref^) then
|
||||
begin
|
||||
regInInstruction := true;
|
||||
exit
|
||||
end;
|
||||
for opcount := 1 to maxinschanges do
|
||||
case insprop[p.opcode].Ch[opCount] of
|
||||
CH_REAX..CH_MEDI:
|
||||
|
||||
Loading…
Reference in New Issue
Block a user