mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-21 19:05:16 +02:00
* fixed parsing of "rcl/rcr rm,imm" (mantis #9025)
git-svn-id: trunk@8272 -
This commit is contained in:
parent
9e46525912
commit
a8191abd16
1
.gitattributes
vendored
1
.gitattributes
vendored
@ -8341,6 +8341,7 @@ tests/webtbs/tw8950.pp svneol=native#text/plain
|
||||
tests/webtbs/tw8975.pp svneol=native#text/plain
|
||||
tests/webtbs/tw8975a.pp svneol=native#text/plain
|
||||
tests/webtbs/tw8977.pp svneol=native#text/plain
|
||||
tests/webtbs/tw9025.pp svneol=native#text/plain
|
||||
tests/webtbs/tw9026.pp svneol=native#text/plain
|
||||
tests/webtbs/tw9054.pp svneol=native#text/plain
|
||||
tests/webtbs/tw9059.pp svneol=native#text/plain
|
||||
|
@ -5456,9 +5456,9 @@
|
||||
(
|
||||
opcode : A_RCL;
|
||||
ops : 2;
|
||||
optypes : (ot_regmem or ot_bits16 or ot_bits32 or ot_bits64,ot_immediate or ot_bits8,ot_none);
|
||||
optypes : (ot_regmem or ot_bits16 or ot_bits32 or ot_bits64,ot_immediate,ot_none);
|
||||
code : #192#208#1#193#130#21;
|
||||
flags : if_8086
|
||||
flags : if_8086 or if_sb
|
||||
),
|
||||
(
|
||||
opcode : A_RCL;
|
||||
@ -5498,9 +5498,9 @@
|
||||
(
|
||||
opcode : A_RCR;
|
||||
ops : 2;
|
||||
optypes : (ot_regmem or ot_bits16 or ot_bits32 or ot_bits64,ot_immediate or ot_bits8,ot_none);
|
||||
optypes : (ot_regmem or ot_bits16 or ot_bits32 or ot_bits64,ot_immediate,ot_none);
|
||||
code : #192#208#1#193#131#21;
|
||||
flags : if_8086
|
||||
flags : if_8086 or if_sb
|
||||
),
|
||||
(
|
||||
opcode : A_RCR;
|
||||
|
@ -1721,7 +1721,7 @@ xmmreg,xmmreg \323\3\x66\x0F\xEF\110 WILLAMETTE,SSE2
|
||||
(Ch_Mop2, Ch_Rop1, Ch_RWFlags)
|
||||
rm16|32|64,unity \300\320\1\xD1\202 8086
|
||||
rm16|32|64,reg_cl \300\320\1\xD3\202 8086
|
||||
rm16|32|64,imm8 \300\320\1\xC1\202\25 8086
|
||||
rm16|32|64,imm \300\320\1\xC1\202\25 8086,SB
|
||||
rm8,unity \300\323\1\xD0\202 8086
|
||||
rm8,reg_cl \300\323\1\xD2\202 8086
|
||||
rm8,imm \300\323\1\xC0\202\25 186,SB
|
||||
@ -1730,7 +1730,7 @@ rm8,imm \300\323\1\xC0\202\25 186,SB
|
||||
(Ch_Mop2, Ch_Rop1, Ch_RWFlags)
|
||||
rm16|32|64,unity \300\320\1\xD1\203 8086
|
||||
rm16|32|64,reg_cl \300\320\1\xD3\203 8086
|
||||
rm16|32|64,imm8 \300\320\1\xC1\203\25 8086
|
||||
rm16|32|64,imm \300\320\1\xC1\203\25 8086,SB
|
||||
rm8,unity \300\323\1\xD0\203 8086
|
||||
rm8,reg_cl \300\323\1\xD2\203 8086
|
||||
rm8,imm \300\323\1\xC0\203\25 186,SB
|
||||
|
@ -5407,9 +5407,9 @@
|
||||
(
|
||||
opcode : A_RCL;
|
||||
ops : 2;
|
||||
optypes : (ot_regmem or ot_bits16 or ot_bits32 or ot_bits64,ot_immediate or ot_bits8,ot_none);
|
||||
optypes : (ot_regmem or ot_bits16 or ot_bits32 or ot_bits64,ot_immediate,ot_none);
|
||||
code : #192#208#1#193#130#21;
|
||||
flags : if_8086
|
||||
flags : if_8086 or if_sb
|
||||
),
|
||||
(
|
||||
opcode : A_RCL;
|
||||
@ -5449,9 +5449,9 @@
|
||||
(
|
||||
opcode : A_RCR;
|
||||
ops : 2;
|
||||
optypes : (ot_regmem or ot_bits16 or ot_bits32 or ot_bits64,ot_immediate or ot_bits8,ot_none);
|
||||
optypes : (ot_regmem or ot_bits16 or ot_bits32 or ot_bits64,ot_immediate,ot_none);
|
||||
code : #192#208#1#193#131#21;
|
||||
flags : if_8086
|
||||
flags : if_8086 or if_sb
|
||||
),
|
||||
(
|
||||
opcode : A_RCR;
|
||||
|
11
tests/webtbs/tw9025.pp
Normal file
11
tests/webtbs/tw9025.pp
Normal file
@ -0,0 +1,11 @@
|
||||
{ %cpu=i386,x86_64}
|
||||
{ %norun }
|
||||
|
||||
{$asmmode intel}
|
||||
|
||||
begin
|
||||
asm
|
||||
rcl ax,1
|
||||
rcr ax,1
|
||||
end
|
||||
end.
|
Loading…
Reference in New Issue
Block a user