produce better code for EXG

This commit is contained in:
ceriel 1988-11-07 09:35:47 +00:00
parent af5ed82bff
commit 15e885ac8d

View file

@ -2743,6 +2743,7 @@ dus $1 == 2 | DATASCR | remove(ALL)
"1:" "1:"
"move.w -(%[a]),-(sp)" "move.w -(%[a]),-(sp)"
"dbf %[1],1b" | | | "dbf %[1],1b" | | |
exg $1==2 | ANY ANY | | %[1] %[2] | |
exg | STACK | "move.w #$1,d0" exg | STACK | "move.w #$1,d0"
"jsr .exg" | | | "jsr .exg" | | |
fil | | "move.l #$1,.filn" | | | fil | | "move.l #$1,.filn" | | |