qbit/go
1
0
Fork 0
mirror of https://github.com/golang/go synced 2024-11-20 07:14:40 -07:00
Code Releases Activity

cleaned up data generation in 5g, reverted 5l handling of D_ADDR.

Browse Source 
R=rsc
APPROVED=rsc
DELTA=46  (0 added, 5 deleted, 41 changed)
OCL=31241
CL=31243
This commit is contained in:
Kai Backman 2009-07-06 23:04:56 -07:00
parent 52ccdf3510
commit 908cd8f857
8 changed files with 41 additions and 47 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
src/cmd/5g/cgen.c
View File

@ -506,7 +506,7 @@ agen(Node *n, Node *res)
tmp.op = OADDR; tmp.op = OADDR;
tmp.left = &n2; tmp.left = &n2;
p1 = gins(AMOVW, &tmp, &n3); p1 = gins(AMOVW, &tmp, &n3);
p1->from.scale = w; p1->reg = w;
} else { } else {
nodconst(&n1, t, w); nodconst(&n1, t, w);
gins(optoas(OMUL, t), &n1, &n2); gins(optoas(OMUL, t), &n1, &n2);
@ -815,10 +815,10 @@ stkof(Node *n)
/* /*
* block copy: * block copy:
* memmove(&n, &ns, w); * memmove(&res, &n, w);
*/ */
void void
sgen(Node *n, Node *ns, int32 w) sgen(Node *n, Node *res, int32 w)
{ {
Node nodl, nodr, ndat, nend; Node nodl, nodr, ndat, nend;
int32 c, q, odst, osrc; int32 c, q, odst, osrc;
@ -827,11 +827,11 @@ sgen(Node *n, Node *ns, int32 w)
if(debug['g']) { if(debug['g']) {
print("\nsgen w=%d\n", w); print("\nsgen w=%d\n", w);
dump("r", n); dump("r", n);
dump("res", ns); dump("res", res);
} }
if(w == 0) if(w == 0)
return; return;
if(n->ullman >= UINF && ns->ullman >= UINF) { if(n->ullman >= UINF && res->ullman >= UINF) {
fatal("sgen UINF"); fatal("sgen UINF");
} }
@ -840,17 +840,17 @@ sgen(Node *n, Node *ns, int32 w)
// offset on the stack // offset on the stack
osrc = stkof(n); osrc = stkof(n);
odst = stkof(ns); odst = stkof(res);
regalloc(&nodl, types[tptr], N); regalloc(&nodl, types[tptr], N);
regalloc(&nodr, types[tptr], N); regalloc(&nodr, types[tptr], N);
regalloc(&ndat, types[TUINT32], N); regalloc(&ndat, types[TUINT32], N);
if(n->ullman >= ns->ullman) { if(n->ullman >= res->ullman) {
agen(n, &nodr); agen(n, &nodr);
agen(ns, &nodl); agen(res, &nodl);
} else { } else {
agen(ns, &nodl); agen(res, &nodl);
agen(n, &nodr); agen(n, &nodr);
} }
@ -890,33 +890,33 @@ sgen(Node *n, Node *ns, int32 w)
// normal direction // normal direction
if(q >= 4) { if(q >= 4) {
regalloc(&nend, types[TUINT32], N); regalloc(&nend, types[TUINT32], N);
p = gins(AMOVW, &nodl, &nend); p = gins(AMOVW, &nodr, &nend);
p->from.type = D_CONST; p->from.type = D_CONST;
p->from.offset = q; p->from.offset = q;
p = gins(AMOVW, &nodl, &ndat); p = gins(AMOVW, &nodr, &ndat);
p->from.type = D_OREG; p->from.type = D_OREG;
p->from.offset = 4; p->from.offset = 4;
p->scond |= C_PBIT; p->scond |= C_PBIT;
p = gins(AMOVW, &ndat, &nodr); p = gins(AMOVW, &ndat, &nodl);
p->to.type = D_OREG; p->to.type = D_OREG;
p->to.offset = 4; p->to.offset = 4;
p->scond |= C_PBIT; p->scond |= C_PBIT;
gins(ACMP, &nodl, &nend); gins(ACMP, &nodr, &nend);
fatal("sgen loop not implemented"); fatal("sgen loop not implemented");
p = gins(ABNE, N, N); p = gins(ABNE, N, N);
// TODO(PC offset) // TODO(PC offset)
regfree(&nend); regfree(&nend);
} else } else
while(q > 0) { while(q > 0) {
p = gins(AMOVW, &nodl, &ndat); p = gins(AMOVW, &nodr, &ndat);
p->from.type = D_OREG; p->from.type = D_OREG;
p->from.offset = 4; p->from.offset = 4;
p->scond |= C_PBIT; p->scond |= C_PBIT;
p = gins(AMOVW, &ndat, &nodr); p = gins(AMOVW, &ndat, &nodl);
p->to.type = D_OREG; p->to.type = D_OREG;
p->to.offset = 4; p->to.offset = 4;
p->scond |= C_PBIT; p->scond |= C_PBIT;

1
src/cmd/5g/galign.c
View File

@ -34,7 +34,6 @@ betypeinit(void)
zprog.from.type = D_NONE; zprog.from.type = D_NONE;
zprog.from.name = D_NONE; zprog.from.name = D_NONE;
zprog.from.reg = NREG; zprog.from.reg = NREG;
zprog.from.scale = 0;
zprog.to = zprog.from; zprog.to = zprog.from;
listinit(); listinit();

4
src/cmd/5g/gg.h
View File

@ -2,7 +2,6 @@
// Use of this source code is governed by a BSD-style // Use of this source code is governed by a BSD-style
// license that can be found in the LICENSE file. // license that can be found in the LICENSE file.
#include <u.h> #include <u.h>
#include <libc.h> #include <libc.h>
@ -29,7 +28,6 @@ struct Addr
char name; char name;
char reg; char reg;
uchar etype; uchar etype;
uchar scale; /* doubles as width in DATA op */
}; };
#define A ((Addr*)0) #define A ((Addr*)0)
@ -41,7 +39,7 @@ struct Prog
Addr from; // src address Addr from; // src address
Addr to; // dst address Addr to; // dst address
Prog* link; // next instruction in this func Prog* link; // next instruction in this func
char reg; char reg; // doubles as width in DATA op
uchar scond; uchar scond;
}; };

18
src/cmd/5g/ggen.c
View File

@ -740,18 +740,18 @@ gen_as_init(Node *nr, Node *nl)
} }
p = gins(ADATA, &nam, nr->left); p = gins(ADATA, &nam, nr->left);
p->from.scale = types[tptr]->width; p->reg = types[tptr]->width;
p->to.type = D_ADDR; p->to.type = D_CONST;
//print("%P\n", p); //print("%P\n", p);
nodconst(&nod1, types[TINT32], nr->left->type->bound); nodconst(&nod1, types[TINT32], nr->left->type->bound);
p = gins(ADATA, &nam, &nod1); p = gins(ADATA, &nam, &nod1);
p->from.scale = types[TINT32]->width; p->reg = types[TINT32]->width;
p->from.offset += types[tptr]->width; p->from.offset += types[tptr]->width;
//print("%P\n", p); //print("%P\n", p);
p = gins(ADATA, &nam, &nod1); p = gins(ADATA, &nam, &nod1);
p->from.scale = types[TINT32]->width; p->reg = types[TINT32]->width;
p->from.offset += types[tptr]->width+types[TINT32]->width; p->from.offset += types[tptr]->width+types[TINT32]->width;
goto yes; goto yes;
@ -803,24 +803,24 @@ lit:
case TFLOAT64: case TFLOAT64:
case TFLOAT: case TFLOAT:
p = gins(ADATA, &nam, nr); p = gins(ADATA, &nam, nr);
p->from.scale = nr->type->width; p->reg = nr->type->width;
break; break;
case TSTRING: case TSTRING:
p = gins(ADATA, &nam, N); p = gins(ADATA, &nam, N);
datastring(nr->val.u.sval->s, nr->val.u.sval->len, &p->to); datastring(nr->val.u.sval->s, nr->val.u.sval->len, &p->to);
p->from.scale = types[tptr]->width; p->reg = types[tptr]->width;
p->to.type = D_ADDR; p->to.type = D_CONST;
//print("%P\n", p); //print("%P\n", p);
nodconst(&nod1, types[TINT32], nr->val.u.sval->len); nodconst(&nod1, types[TINT32], nr->val.u.sval->len);
p = gins(ADATA, &nam, &nod1); p = gins(ADATA, &nam, &nod1);
p->from.scale = types[TINT32]->width; p->reg = types[TINT32]->width;
p->from.offset += types[tptr]->width; p->from.offset += types[tptr]->width;
//print("%P\n", p); //print("%P\n", p);
p = gins(ADATA, &nam, &nod1); p = gins(ADATA, &nam, &nod1);
p->from.scale = types[TINT32]->width; p->reg = types[TINT32]->width;
p->from.offset += types[tptr]->width+types[TINT32]->width; p->from.offset += types[tptr]->width+types[TINT32]->width;
break; break;
} }

25
src/cmd/5g/gobj.c
View File

@ -110,7 +110,6 @@ zaddr(Biobuf *b, Addr *a, int s)
case D_REG: case D_REG:
case D_FREG: case D_FREG:
case D_PSR: case D_PSR:
case D_ADDR:
break; break;
case D_CONST2: case D_CONST2:
@ -367,14 +366,14 @@ datastring(char *s, int len, Addr *a)
p->from = ao; p->from = ao;
p->from.offset = w; p->from.offset = w;
p->from.scale = NSNAME; p->reg = NSNAME;
if(w+8 > len) if(w+8 > len)
p->from.scale = len-w; p->reg = len-w;
p->to = ac; p->to = ac;
p->to.type = D_SCONST; p->to.type = D_SCONST;
p->to.offset = len; p->to.offset = len;
memmove(p->to.sval, s+w, p->from.scale); memmove(p->to.sval, s+w, p->reg);
} }
p = pc; p = pc;
ggloblsym(ao.sym, len, ao.name == D_EXTERN); ggloblsym(ao.sym, len, ao.name == D_EXTERN);
@ -415,7 +414,7 @@ datagostring(Strlit *sval, Addr *a)
// $string len+ptr // $string len+ptr
datastring(sval->s, sval->len, &ap); datastring(sval->s, sval->len, &ap);
ap.type = D_ADDR; ap.type = D_CONST;
ap.etype = TINT32; ap.etype = TINT32;
wi = types[TUINT32]->width; wi = types[TUINT32]->width;
wp = types[tptr]->width; wp = types[tptr]->width;
@ -444,7 +443,7 @@ datagostring(Strlit *sval, Addr *a)
p = pc; p = pc;
gins(ADATA, N, N); gins(ADATA, N, N);
p->from = ao; p->from = ao;
p->from.scale = wp; p->reg = wp;
p->to = ap; p->to = ap;
// DATA gostring+wp, wi, $len // DATA gostring+wp, wi, $len
@ -452,7 +451,7 @@ datagostring(Strlit *sval, Addr *a)
gins(ADATA, N, N); gins(ADATA, N, N);
p->from = ao; p->from = ao;
p->from.offset = wp; p->from.offset = wp;
p->from.scale = wi; p->reg = wi;
p->to = ac; p->to = ac;
p->to.offset = sval->len; p->to.offset = sval->len;
@ -474,10 +473,10 @@ dstringptr(Sym *s, int off, char *str)
p->from.name = D_EXTERN; p->from.name = D_EXTERN;
p->from.sym = s; p->from.sym = s;
p->from.offset = off; p->from.offset = off;
p->from.scale = widthptr; p->reg = widthptr;
datastring(str, strlen(str)+1, &p->to); datastring(str, strlen(str)+1, &p->to);
p->to.type = D_ADDR; p->to.type = D_CONST;
p->to.etype = TINT32; p->to.etype = TINT32;
off += widthptr; off += widthptr;
@ -496,7 +495,7 @@ duintxx(Sym *s, int off, uint64 v, int wid)
p->from.name = D_EXTERN; p->from.name = D_EXTERN;
p->from.sym = s; p->from.sym = s;
p->from.offset = off; p->from.offset = off;
p->from.scale = wid; p->reg = wid;
p->to.type = D_CONST; p->to.type = D_CONST;
p->to.name = D_NONE; p->to.name = D_NONE;
p->to.offset = v; p->to.offset = v;
@ -535,8 +534,8 @@ dsymptr(Sym *s, int off, Sym *x)
p->from.name = D_EXTERN; p->from.name = D_EXTERN;
p->from.sym = s; p->from.sym = s;
p->from.offset = off; p->from.offset = off;
p->from.scale = widthptr; p->reg = widthptr;
p->to.type = D_ADDR; p->to.type = D_CONST;
p->to.name = D_EXTERN; p->to.name = D_EXTERN;
p->to.sym = x; p->to.sym = x;
p->to.offset = 0; p->to.offset = 0;
@ -579,7 +578,7 @@ genembedtramp(Type *t, Sig *b)
// p->from.sym = b->sym; // p->from.sym = b->sym;
// p->to.type = D_CONST; // p->to.type = D_CONST;
// p->to.offset = 0; // p->to.offset = 0;
// p->from.scale = 7; // p->reg = 7;
// //print("1. %P\n", p); // //print("1. %P\n", p);
// loaded = 0; // loaded = 0;

3
src/cmd/5g/gsubr.c
View File

@ -162,7 +162,7 @@ ggloblsym(Sym *s, int32 width, int dupok)
p->to.name = D_NONE; p->to.name = D_NONE;
p->to.offset = width; p->to.offset = width;
if(dupok) if(dupok)
p->from.scale = DUPOK; p->reg = DUPOK;
} }
int int
@ -1063,7 +1063,6 @@ raddr(Node *n, Prog *p)
void void
naddr(Node *n, Addr *a) naddr(Node *n, Addr *a)
{ {
a->scale = 0;
a->type = D_NONE; a->type = D_NONE;
a->name = D_NONE; a->name = D_NONE;
a->reg = NREG; a->reg = NREG;

2
src/cmd/5g/list.c
View File

@ -60,7 +60,7 @@ Pconv(Fmt *fp)
break; break;
case ADATA: case ADATA:
sconsize = p->from.scale; sconsize = p->reg;
snprint(str, sizeof(str), "%.4ld (%4ld) %-7A %D/%d,%D", snprint(str, sizeof(str), "%.4ld (%4ld) %-7A %D/%d,%D",
p->loc, p->lineno, p->as, &p->from, sconsize, &p->to); p->loc, p->lineno, p->as, &p->from, sconsize, &p->to);
break; break;

1
src/cmd/5l/obj.c
View File

@ -539,7 +539,6 @@ zaddr(Biobuf *f, Adr *a, Sym *h[])
case D_FREG: case D_FREG:
case D_PSR: case D_PSR:
case D_FPCR: case D_FPCR:
case D_ADDR:
break; break;
case D_REGREG: case D_REGREG: