maybe I got it right this time!

This commit is contained in:
ceriel 1988-09-02 13:49:07 +00:00
parent 2b47b43390
commit feb6e7505c

View file

@ -2947,7 +2947,7 @@ loc inn zne $2==4 | source4 |
remove(ALL)
"bitl\t%[1],$$%(1<<$1%)"
"jneq\t$3" | | |
inn zeq $1==4 | source4-(ind2+ind4) source4 |
inn zeq $1==4 | source4-(reginc4+regdec4+ind4) source4 |
remove(ALL)
allocate(REG)
"cmpl\t%[1],$$31"
@ -2955,8 +2955,16 @@ inn zeq $1==4 | source4-(ind2+ind4) source4 |
"ashl\t%[1],$$1,%[a]"
"bitl\t%[2],%[a]"
"jeql\t$2" | | |
... | NC source1 source4 |
remove(ALL)
allocate(REG)
"cmpb\t%[1],$$31"
"jgtru\t$2"
"ashl\t%[1],$$1,%[a]"
"bitl\t%[2],%[a]"
"jeql\t$2" | | |
#ifdef LOCLABS
inn zne $1==4 | source4-(ind2+ind4) source4 |
inn zne $1==4 | source4-(reginc4+regdec4+ind4) source4 |
remove(ALL)
allocate(REG)
"cmpl\t%[1],$$31"
@ -2964,6 +2972,14 @@ inn zne $1==4 | source4-(ind2+ind4) source4 |
"ashl\t%[1],$$1,%[a]"
"bitl\t%[2],%[a]"
"jneq\t$2\n1:" | | |
... | NC source1 source4 |
remove(ALL)
allocate(REG)
"cmpb\t%[1],$$31"
"bgtru\t1f"
"ashl\t%[1],$$1,%[a]"
"bitl\t%[2],%[a]"
"jneq\t$2\n1:" | | |
#endif
loc inn zeq $2==8 && $1<32 /* First half of set. */
| REG REG |