diff options
| author | cinap_lenrek <cinap_lenrek@felloff.net> | 2019-05-09 10:23:23 +0200 |
|---|---|---|
| committer | cinap_lenrek <cinap_lenrek@felloff.net> | 2019-05-09 10:23:23 +0200 |
| commit | e8cf7530517534ccd9f5b0469191aa7c41581120 (patch) | |
| tree | 5069ad580f417529a446490ff9573a92ef538526 /sys/src/cmd/7l/asmout.c | |
| parent | 4e7fbabfc9f33f6ea5e5a46d5d6d7532d5f68301 (diff) | |
7l: implement MOVP instruction
Diffstat (limited to 'sys/src/cmd/7l/asmout.c')
| -rw-r--r-- | sys/src/cmd/7l/asmout.c | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/sys/src/cmd/7l/asmout.c b/sys/src/cmd/7l/asmout.c index 5a30d13d4..52b59f253 100644 --- a/sys/src/cmd/7l/asmout.c +++ b/sys/src/cmd/7l/asmout.c @@ -847,6 +847,34 @@ asmout(Prog *p, Optab *o) o1 = omovlit(AMOV, p, &p->from, REGTMP); o2 = olsr12u(opldr12(p->as), 0, REGTMP, p->to.reg); break; + + case 66: /* movpT (R)O!,R; movpT O(R)!, R -> ldrT */ + o1 = opldrpp(p->as); + v = p->from.offset >> 2 + ((o1 & S64) != 0); + if(v < -128 || v > 127) + diag("offset out of range\n%P", p); + if(p->from.type == D_XPOST) + o1 |= 1<<23; + else if(p->from.type == D_XPRE) + o1 |= 3<<23; + else + o1 |= 2<<23; + o1 |= ((v&0x7F)<<15) | (p->from.reg<<5) | p->reg | (p->to.reg<<10); + break; + + case 67: /* movpT R,(R)O!; movpT O(R)!, R -> strT */ + o1 = LD2STR(opldrpp(p->as)); + v = p->to.offset >> 2 + ((o1 & S64) != 0); + if(v < -128 || v > 127) + diag("offset out of range\n%P", p); + if(p->to.type == D_XPOST) + o1 |= 1<<23; + else if(p->to.type == D_XPRE) + o1 |= 3<<23; + else + o1 |= 2<<23; + o1 |= ((v&0x7F)<<15) | (p->to.reg<<5) | p->from.reg | (p->reg<<10); + break; } if(debug['a'] > 1) @@ -1552,6 +1580,9 @@ opldrpp(int a) case AMOVHU: return 1<<30 | 7<<27 | 0<<26 | 0<<24 | 1<<22; case AMOVB: return 0<<30 | 7<<27 | 0<<26 | 0<<24 | 2<<22; case AMOVBU: return 0<<30 | 7<<27 | 0<<26 | 0<<24 | 1<<22; + case AMOVPW: return 0<<30 | 5<<27 | 0<<26 | 0<<23 | 1<<22; + case AMOVPSW: return 1<<30 | 5<<27 | 0<<26 | 0<<23 | 1<<22; + case AMOVP: return 2<<30 | 5<<27 | 0<<26 | 0<<23 | 1<<22; } diag("bad opldr %A\n%P", a, curp); return 0; |