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

Yet another fix: this time for AND/IOR/XOR/COM ?

Browse source
This commit is contained in:
ceriel 1991-03-25 11:39:27 +00:00
parent 6f4da1d70a
commit 043ad764b8
4 changed files with 128 additions and 36 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

41
mach/m68020/ncg/table
View file

@ -4747,22 +4747,35 @@ with STACK
xxx* %c, {post_inc_int, %b} xxx* %c, {post_inc_int, %b}
dbf %a, {slabel, 1b} dbf %a, {slabel, 1b}
#if WORD_SIZE==4
proc logndef proc logndef
with DD_REG4 STACK with DD_REG4 STACK
uses AA_REG, uses AA_REG,
DD_REG DD_REG
gen gen
lea {regAregXcon, sp, %1, 1, 0},%a lea {regAregXcon, sp, %1, 1, 0},%a
#if WORD_SIZE==2
asr_l {small_const, 1}, %1
#else
asr_l {small_const, 2}, %1 asr_l {small_const, 2}, %1
#endif
1: 1:
move_i {post_inc_int, sp}, %b move_i {post_inc_int, sp}, %b
xxx* %b, {post_inc_int, %a} xxx* %b, {post_inc_int, %a}
sub_l {const4,1}, %1 sub_l {const4,1}, %1
bne {slabel, 1b} bne {slabel, 1b}
#else
proc logndef
with any_int STACK
uses AA_REG,
DD_REG,
DD_REG4
gen
move %1, %c.1
lea {regAregXcon, sp, %c, 1, 0},%a
asr_l {small_const, 1}, %c
sub_l {const4,1}, %c
1:
move_i {post_inc_int, sp}, %b
xxx* %b, {post_inc_int, %a}
dbf %c, {slabel, 1b}
#endif
proc logbdef example and proc logbdef example and
with STACK with STACK
@ -4842,19 +4855,29 @@ with STACK
sub_l {const4, 1}, %b sub_l {const4, 1}, %b
bne {slabel, 1b} bne {slabel, 1b}
#if WORD_SIZE==4
pat com !defined($1) pat com !defined($1)
with DD_REG4 STACK with DD_REG STACK
uses AA_REG uses AA_REG
gen move_l sp, %a gen move_l sp, %a
#if WORD_SIZE==2
asr_l {small_const, 1}, %1
#else
asr_l {small_const, 2}, %1 asr_l {small_const, 2}, %1
#endif
1: 1:
not_i {post_inc_int, %a} not_i {post_inc_int, %a}
sub_l {const4, 1}, %1 sub_l {const4, 1}, %1
bne {slabel, 1b} bne {slabel, 1b}
#else
pat com !defined($1)
with any_int STACK
uses AA_REG,
DD_REG4
gen move %1, %b.1
move_l sp, %a
asr_l {small_const, 1}, %b
sub_l {const4, 1}, %b
1:
not_i {post_inc_int, %a}
dbf %b, {slabel, 1b}
#endif
#if WORD_SIZE==2 #if WORD_SIZE==2
pat rol $1==2 pat rol $1==2

41
mach/m68k2/ncg/table
View file

@ -4747,22 +4747,35 @@ with STACK
xxx* %c, {post_inc_int, %b} xxx* %c, {post_inc_int, %b}
dbf %a, {slabel, 1b} dbf %a, {slabel, 1b}
#if WORD_SIZE==4
proc logndef proc logndef
with DD_REG4 STACK with DD_REG4 STACK
uses AA_REG, uses AA_REG,
DD_REG DD_REG
gen gen
lea {regAregXcon, sp, %1, 1, 0},%a lea {regAregXcon, sp, %1, 1, 0},%a
#if WORD_SIZE==2
asr_l {small_const, 1}, %1
#else
asr_l {small_const, 2}, %1 asr_l {small_const, 2}, %1
#endif
1: 1:
move_i {post_inc_int, sp}, %b move_i {post_inc_int, sp}, %b
xxx* %b, {post_inc_int, %a} xxx* %b, {post_inc_int, %a}
sub_l {const4,1}, %1 sub_l {const4,1}, %1
bne {slabel, 1b} bne {slabel, 1b}
#else
proc logndef
with any_int STACK
uses AA_REG,
DD_REG,
DD_REG4
gen
move %1, %c.1
lea {regAregXcon, sp, %c, 1, 0},%a
asr_l {small_const, 1}, %c
sub_l {const4,1}, %c
1:
move_i {post_inc_int, sp}, %b
xxx* %b, {post_inc_int, %a}
dbf %c, {slabel, 1b}
#endif
proc logbdef example and proc logbdef example and
with STACK with STACK
@ -4842,19 +4855,29 @@ with STACK
sub_l {const4, 1}, %b sub_l {const4, 1}, %b
bne {slabel, 1b} bne {slabel, 1b}
#if WORD_SIZE==4
pat com !defined($1) pat com !defined($1)
with DD_REG4 STACK with DD_REG STACK
uses AA_REG uses AA_REG
gen move_l sp, %a gen move_l sp, %a
#if WORD_SIZE==2
asr_l {small_const, 1}, %1
#else
asr_l {small_const, 2}, %1 asr_l {small_const, 2}, %1
#endif
1: 1:
not_i {post_inc_int, %a} not_i {post_inc_int, %a}
sub_l {const4, 1}, %1 sub_l {const4, 1}, %1
bne {slabel, 1b} bne {slabel, 1b}
#else
pat com !defined($1)
with any_int STACK
uses AA_REG,
DD_REG4
gen move %1, %b.1
move_l sp, %a
asr_l {small_const, 1}, %b
sub_l {const4, 1}, %b
1:
not_i {post_inc_int, %a}
dbf %b, {slabel, 1b}
#endif
#if WORD_SIZE==2 #if WORD_SIZE==2
pat rol $1==2 pat rol $1==2

41
mach/m68k4/ncg/table
View file

@ -4747,22 +4747,35 @@ with STACK
xxx* %c, {post_inc_int, %b} xxx* %c, {post_inc_int, %b}
dbf %a, {slabel, 1b} dbf %a, {slabel, 1b}
#if WORD_SIZE==4
proc logndef proc logndef
with DD_REG4 STACK with DD_REG4 STACK
uses AA_REG, uses AA_REG,
DD_REG DD_REG
gen gen
lea {regAregXcon, sp, %1, 1, 0},%a lea {regAregXcon, sp, %1, 1, 0},%a
#if WORD_SIZE==2
asr_l {small_const, 1}, %1
#else
asr_l {small_const, 2}, %1 asr_l {small_const, 2}, %1
#endif
1: 1:
move_i {post_inc_int, sp}, %b move_i {post_inc_int, sp}, %b
xxx* %b, {post_inc_int, %a} xxx* %b, {post_inc_int, %a}
sub_l {const4,1}, %1 sub_l {const4,1}, %1
bne {slabel, 1b} bne {slabel, 1b}
#else
proc logndef
with any_int STACK
uses AA_REG,
DD_REG,
DD_REG4
gen
move %1, %c.1
lea {regAregXcon, sp, %c, 1, 0},%a
asr_l {small_const, 1}, %c
sub_l {const4,1}, %c
1:
move_i {post_inc_int, sp}, %b
xxx* %b, {post_inc_int, %a}
dbf %c, {slabel, 1b}
#endif
proc logbdef example and proc logbdef example and
with STACK with STACK
@ -4842,19 +4855,29 @@ with STACK
sub_l {const4, 1}, %b sub_l {const4, 1}, %b
bne {slabel, 1b} bne {slabel, 1b}
#if WORD_SIZE==4
pat com !defined($1) pat com !defined($1)
with DD_REG4 STACK with DD_REG STACK
uses AA_REG uses AA_REG
gen move_l sp, %a gen move_l sp, %a
#if WORD_SIZE==2
asr_l {small_const, 1}, %1
#else
asr_l {small_const, 2}, %1 asr_l {small_const, 2}, %1
#endif
1: 1:
not_i {post_inc_int, %a} not_i {post_inc_int, %a}
sub_l {const4, 1}, %1 sub_l {const4, 1}, %1
bne {slabel, 1b} bne {slabel, 1b}
#else
pat com !defined($1)
with any_int STACK
uses AA_REG,
DD_REG4
gen move %1, %b.1
move_l sp, %a
asr_l {small_const, 1}, %b
sub_l {const4, 1}, %b
1:
not_i {post_inc_int, %a}
dbf %b, {slabel, 1b}
#endif
#if WORD_SIZE==2 #if WORD_SIZE==2
pat rol $1==2 pat rol $1==2

41
mach/moon3/ncg/table
View file

@ -4747,22 +4747,35 @@ with STACK
xxx* %c, {post_inc_int, %b} xxx* %c, {post_inc_int, %b}
dbf %a, {slabel, 1b} dbf %a, {slabel, 1b}
#if WORD_SIZE==4
proc logndef proc logndef
with DD_REG4 STACK with DD_REG4 STACK
uses AA_REG, uses AA_REG,
DD_REG DD_REG
gen gen
lea {regAregXcon, sp, %1, 1, 0},%a lea {regAregXcon, sp, %1, 1, 0},%a
#if WORD_SIZE==2
asr_l {small_const, 1}, %1
#else
asr_l {small_const, 2}, %1 asr_l {small_const, 2}, %1
#endif
1: 1:
move_i {post_inc_int, sp}, %b move_i {post_inc_int, sp}, %b
xxx* %b, {post_inc_int, %a} xxx* %b, {post_inc_int, %a}
sub_l {const4,1}, %1 sub_l {const4,1}, %1
bne {slabel, 1b} bne {slabel, 1b}
#else
proc logndef
with any_int STACK
uses AA_REG,
DD_REG,
DD_REG4
gen
move %1, %c.1
lea {regAregXcon, sp, %c, 1, 0},%a
asr_l {small_const, 1}, %c
sub_l {const4,1}, %c
1:
move_i {post_inc_int, sp}, %b
xxx* %b, {post_inc_int, %a}
dbf %c, {slabel, 1b}
#endif
proc logbdef example and proc logbdef example and
with STACK with STACK
@ -4842,19 +4855,29 @@ with STACK
sub_l {const4, 1}, %b sub_l {const4, 1}, %b
bne {slabel, 1b} bne {slabel, 1b}
#if WORD_SIZE==4
pat com !defined($1) pat com !defined($1)
with DD_REG4 STACK with DD_REG STACK
uses AA_REG uses AA_REG
gen move_l sp, %a gen move_l sp, %a
#if WORD_SIZE==2
asr_l {small_const, 1}, %1
#else
asr_l {small_const, 2}, %1 asr_l {small_const, 2}, %1
#endif
1: 1:
not_i {post_inc_int, %a} not_i {post_inc_int, %a}
sub_l {const4, 1}, %1 sub_l {const4, 1}, %1
bne {slabel, 1b} bne {slabel, 1b}
#else
pat com !defined($1)
with any_int STACK
uses AA_REG,
DD_REG4
gen move %1, %b.1
move_l sp, %a
asr_l {small_const, 1}, %b
sub_l {const4, 1}, %b
1:
not_i {post_inc_int, %a}
dbf %b, {slabel, 1b}
#endif
#if WORD_SIZE==2 #if WORD_SIZE==2
pat rol $1==2 pat rol $1==2