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

Some minor modifications reflecting some changes in the peephole optimizer

Browse source
This commit is contained in:
ceriel 1992-09-01 09:39:15 +00:00
parent 6b5abe7ab3
commit 6f03cff48f
2 changed files with 14 additions and 33 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
mach/arm/ncg/table
View file

@ -668,6 +668,8 @@ pat lol loc ior stl inreg($1)==reg_any && inreg($4)==reg_any && $3==4
pat lol loc xor stl inreg($1)==reg_any && inreg($4)==reg_any && $3==4 pat lol loc xor stl inreg($1)==reg_any && inreg($4)==reg_any && $3==4
call lol_loc_op_stl("EOR") call lol_loc_op_stl("EOR")
pat lol dup inreg($1)==reg_any && $2==4 leaving lol $1 lol $1
/* Procedure : load register, load register, op xx, store register */ /* Procedure : load register, load register, op xx, store register */
proc lol_lol_op_stl example lol lol adi stl proc lol_lol_op_stl example lol lol adi stl
kills local %ind==$4 kills local %ind==$4
@ -772,7 +774,7 @@ kills GENREG
gen STR_B %1, {regrelpi, regvar($1), $5} gen STR_B %1, {regrelpi, regvar($1), $5}
/* code for *pp->p++ and *pp->p-- (integers) */ /* code for *pp->p++ and *pp->p-- (integers) */
pat lil lil adp sil loi $1==$2 && $2==$4 && $5==4 && inreg($1)==reg_any pat lil dup adp sil loi $1==$4 && $2==4 && $5==4 && inreg($1)==reg_any
kills GENREG kills GENREG
uses GENREG,GENREG uses GENREG,GENREG
gen LDR %a, {regind, regvar($1)} gen LDR %a, {regind, regvar($1)}
@ -780,7 +782,7 @@ gen LDR %a, {regind, regvar($1)}
STR %b, {regind, regvar($1)} STR %b, {regind, regvar($1)}
LDR %b, {regind, %a} yields %b LDR %b, {regind, %a} yields %b
pat lil lil adp sil sti $1==$2 && $2==$4 && $5==4 && inreg($1)==reg_any pat lil dup adp sil sti $1==$4 && $2==4 && $5==4 && inreg($1)==reg_any
with GENREG with GENREG
kills GENREG kills GENREG
uses GENREG,GENREG uses GENREG,GENREG
@ -790,7 +792,7 @@ gen LDR %a, {regind, regvar($1)}
STR %1, {regind, %a} STR %1, {regind, %a}
/* code for *pp->p++ and *pp->p-- (bytes) */ /* code for *pp->p++ and *pp->p-- (bytes) */
pat lil lil adp sil loi $1==$2 && $2==$4 && $5==1 && inreg($1)==reg_any pat lil dup adp sil loi $1==$4 && $2==4 && $5==1 && inreg($1)==reg_any
kills GENREG kills GENREG
uses GENREG,GENREG uses GENREG,GENREG
gen LDR %a, {regind, regvar($1)} gen LDR %a, {regind, regvar($1)}
@ -798,7 +800,7 @@ gen LDR %a, {regind, regvar($1)}
STR %b, {regind, regvar($1)} STR %b, {regind, regvar($1)}
LDR_B %b, {regind, %a} yields %b LDR_B %b, {regind, %a} yields %b
pat lil lil adp sil sti $1==$2 && $2==$4 && $5==1 && inreg($1)==reg_any pat lil dup adp sil sti $1==$4 && $2==4 && $5==1 && inreg($1)==reg_any
with GENREG with GENREG
kills GENREG kills GENREG
uses GENREG,GENREG uses GENREG,GENREG
@ -2248,14 +2250,14 @@ gen move %1, {absolute, "_RegHp"}
/***********************************************************************/ /***********************************************************************/
/* code for *p++ and *p-- (integers)*/ /* code for *p++ and *p-- (integers)*/
pat lol lol adp stl loi $1==$2 && $2==$4 && $5==4 pat lol dup adp stl loi $1==$4 && $2==4 && $5==4
kills GENREG kills GENREG
uses GENREG, GENREG uses GENREG, GENREG
gen move {lb_local, $1}, %a gen move {lb_local, $1}, %a
LDR %b, {regrelpi, %a, $5} LDR %b, {regrelpi, %a, $5}
STR %a, {lb_local, $1} yields %b STR %a, {lb_local, $1} yields %b
pat lol lol adp stl sti $1==$2 && $2==$4 && $5==4 pat lol dup adp stl sti $1==$4 && $2==4 && $5==4
with GENREG with GENREG
kills GENREG kills GENREG
uses GENREG uses GENREG
@ -2264,14 +2266,14 @@ gen move {lb_local,$1}, %a
STR %a, {lb_local, $1} STR %a, {lb_local, $1}
/* code for *p++ and *p-- (bytes)*/ /* code for *p++ and *p-- (bytes)*/
pat lol lol adp stl loi $1==$2 && $2==$4 && $5==1 pat lol dup adp stl loi $1==$4 && $2==4 && $5==1
kills GENREG kills GENREG
uses GENREG, GENREG uses GENREG, GENREG
gen move {lb_local, $1}, %a gen move {lb_local, $1}, %a
LDR_B %b, {regrelpi, %a, $5} LDR_B %b, {regrelpi, %a, $5}
STR %a, {lb_local, $1} yields %b STR %a, {lb_local, $1} yields %b
pat lol lol adp stl sti $1==$2 && $2==$4 && $5==1 pat lol dup adp stl sti $1==$4 && $2==4 && $5==1
with GENREG with GENREG
kills GENREG kills GENREG
uses GENREG uses GENREG
@ -2280,7 +2282,7 @@ gen move {lb_local,$1}, %a
STR %a, {lb_local, $1} STR %a, {lb_local, $1}
/* code for *pp->p++ and *pp->p-- (integers)*/ /* code for *pp->p++ and *pp->p-- (integers)*/
pat lil lil adp sil loi $1==$2 && $2==$4 && $5==4 pat lil dup adp sil loi $1==$4 && $2==4 && $5==4
kills GENREG kills GENREG
uses GENREG, GENREG, GENREG uses GENREG, GENREG, GENREG
gen move {lb_local, $1}, %a gen move {lb_local, $1}, %a
@ -2289,7 +2291,7 @@ gen move {lb_local, $1}, %a
STR %c, {regind, %a} STR %c, {regind, %a}
LDR %c, {regind, %b} yields %c LDR %c, {regind, %b} yields %c
pat lil lil adp sil sti $1==$2 && $2==$4 && $5==4 pat lil dup adp sil sti $1==$4 && $2==4 && $5==4
with GENREG with GENREG
kills GENREG kills GENREG
uses GENREG, GENREG, GENREG uses GENREG, GENREG, GENREG
@ -2300,7 +2302,7 @@ gen move {lb_local, $1}, %a
STR %1, {regind, %b} STR %1, {regind, %b}
/* code for *pp->p++ and *pp->p-- (bytes)*/ /* code for *pp->p++ and *pp->p-- (bytes)*/
pat lil lil adp sil loi $1==$2 && $2==$4 && $5==1 pat lil dup adp sil loi $1==$4 && $2==4 && $5==1
kills GENREG kills GENREG
uses GENREG, GENREG, GENREG uses GENREG, GENREG, GENREG
gen move {lb_local, $1}, %a gen move {lb_local, $1}, %a
@ -2309,7 +2311,7 @@ gen move {lb_local, $1}, %a
STR %c, {regind, %a} STR %c, {regind, %a}
LDR_B %c, {regind, %b} yields %c LDR_B %c, {regind, %b} yields %c
pat lil lil adp sil sti $1==$2 && $2==$4 && $5==1 pat lil dup adp sil sti $1==$4 && $2==4 && $5==1
with GENREG with GENREG
kills GENREG kills GENREG
uses GENREG, GENREG, GENREG uses GENREG, GENREG, GENREG

21
mach/i80/ncg/table
View file

@ -240,12 +240,6 @@ PATTERNS
pat loc yields {const2,$1} pat loc yields {const2,$1}
pat ldc yields {const2,highw($1)} pat ldc yields {const2,highw($1)}
{const2,loww($1)} {const2,loww($1)}
pat lol lol $1==$2
uses hlreg={const2,$1}, dereg
gen dad lb
mov e,{m}
inx hl
mov d,{m} yields de de
pat lol pat lol
uses hlreg={const2,$1}, dereg uses hlreg={const2,$1}, dereg
@ -254,25 +248,10 @@ gen dad lb
inx hl inx hl
mov d,{m} yields de mov d,{m} yields de
pat loe loe $1==$2
uses hlreg
gen lhld {label,$1} yields hl hl
pat loe pat loe
uses hlreg uses hlreg
gen lhld {label,$1} yields hl gen lhld {label,$1} yields hl
pat lil lil $1==$2
uses hlreg={const2,$1}, dereg
gen dad lb
mov e,{m}
inx hl
mov h,{m}
mov l,e
mov e,{m}
inx hl
mov d,{m} yields de de
pat lil pat lil
uses hlreg={const2,$1}, dereg uses hlreg={const2,$1}, dereg
gen dad lb gen dad lb