An improvement to prevent calls to the .cuu routine.
This commit is contained in:
parent
5927f264a8
commit
9dbd1060ad
1 changed files with 3 additions and 6 deletions
|
@ -1139,15 +1139,12 @@ loc loc cii $1==2 && $2==4 | ACC |
|
|||
"cwd"
|
||||
samecc | dx ax | |(1,5)
|
||||
loc loc cii $1==4 && $2==2 | a_word a_word | | %[1] | |
|
||||
loc loc ciu | | | | loc $1 loc $2 cuu |
|
||||
loc loc cui | | | | loc $1 loc $2 cuu |
|
||||
loc loc cuu $1==$2 | | | | |
|
||||
loc loc cuu $1==2 && $2==4 | a_word |
|
||||
allocate(REG={ANYCON,0})| %[a] %[1] | |
|
||||
loc loc cuu $1==4 && $2==2 | a_word a_word | | %[1] | |
|
||||
loc loc ciu $1==2 && $2==4 | a_word |
|
||||
allocate(REG={ANYCON,0})| %[a] %[1] | |
|
||||
loc loc ciu $1==4 && $2==2 | a_word a_word | | %[1] | |
|
||||
loc loc cui $1==2 && $2==4 | a_word |
|
||||
allocate(REG={ANYCON,0})| %[a] %[1] | |
|
||||
loc loc cui $1==4 && $2==2 | a_word a_word | | %[1] | |
|
||||
|
||||
/****************************************
|
||||
* Group 9 : Logical instructions *
|
||||
|
|
Loading…
Reference in a new issue