d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

CMI was translated wrongly; corrected

Browse source
This commit is contained in:
ceriel 1988-03-14 13:56:33 +00:00
parent 23be652f11
commit bf3cfae610
4 changed files with 45 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
mach/ns/ncg/table
View file

@ -1854,8 +1854,15 @@ pat tge ior $2==4 call txxior("bgt")
pat tgt ior $2==4 call txxior("bge")
pat cmi $1==4
with src4 REG
gen subd %1, %2 yields %2
with src4 src4
uses REG={const4, 0}
gen cmpd %2, %1
blt {label, "1f"}
shid %a
br {label, "2f"}
1:
addd {const4, 0-1}, %a
2: yields %a
#ifndef NOFLOAT
pat cmf $1==4

19
mach/pdp/cg/table
View file

@ -1804,15 +1804,16 @@ lar !defined($1) | | remove(all)
* group 12 : Compare instructions *
****************************************/
cmi $1==2 | source2 SCR_REG |
"sub %[1],%[2]"
setcc(%[2])
erase(%[2]) | %[2] | |
... | SCR_REG source2 |
"sub %[2],%[1]"
"neg %[1]"
setcc(%[1])
erase(%[1]) | %[1] | |
cmi $1==2 | source2 source2 |
allocate(REG = {CONST2,0})
"cmp %[1],%[2]"
"beq 2f"
"bgt 1f"
"inc %[a]"
"br 2f"
"1:\tdec %[a]\n2:"
setcc(%[a])
erase(%[a]) | %[a] | |
ldc cmi zlt highw(1)==0 && loww(1)==0 && $2==4 | source2 source2 |
| %[1] | zlt $3 |
ldc cmi zge highw(1)==0 && loww(1)==0 && $2==4 | source2 source2 |

15
mach/pdp/ncg/table
View file

@ -1632,11 +1632,16 @@ gen jsr pc,{label, "ilar~"}
****************************************/
pat cmi $1==2
with src2 REG
gen sub %1,%2 yields %2
with REG src2
gen sub %2,%1
neg %1 yields %1
with src2 src2
uses REG = {const2,0}
gen cmp %1,%2
beq {label,2f}
bgt {label,1f}
inc %a
br {label,2f}
1:
dec %a
2: yields %a
pat cmi $1==4
kills ALL

17
mach/z8000/cg/table
View file

@ -1157,7 +1157,22 @@ lae lar defined(rom(1,3)) | | | | lae $1 aar $2 loi rom(1,3) |
******** GROUP 12 ********
***************************************/
cmi $1==2 | | | | sbi $1 |
cmi $1==2 | src2 REG | allocate( REG = {im2, 0} )
"cp %[2], %[1]"
"jr EQ, 2f"
"jr LT, 1f"
"inc %[a]"
"jr 2f"
"1:\tdec %[a]\n2:"
erase(%[a]) nocc | %[a] | |
... | NC im2 src2a | allocate( REG = {im2, 0} )
"cp %[2], %[1]"
"jr EQ, 2f"
"jr LT, 1f"
"inc %[a]"
"jr 2f"
"1:\tdec %[a]\n2:"
erase(%[a]) nocc | %[a] | |
cmi $1==4 | STACK | "calr cmi4" | R0 | |
cmi !defined($1)| src2 STACK | move( %[1], R0 )
"calr cmi"