d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Added some register decls

Browse source
This commit is contained in:
ceriel 1987-06-30 18:24:27 +00:00
parent 87c67b8c5f
commit d473c8b1df
2 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
mach/proto/cg/codegen.c
View file

@ -77,7 +77,8 @@ unsigned codegen(codep,ply,toplevel,costlimit,forced) byte *codep; unsigned cost
token_p tp; token_p tp;
tkdef_p tdp; tkdef_p tdp;
int tinstno; int tinstno;
struct reginfo *rp,**rpp; register struct reginfo *rp;
struct reginfo **rpp;
token_t token,mtoken,token2; token_t token,mtoken,token2;
int propno; int propno;
int exactmatch; int exactmatch;
@ -92,7 +93,7 @@ unsigned codegen(codep,ply,toplevel,costlimit,forced) byte *codep; unsigned cost
token_p regtp[MAXCREG]; token_p regtp[MAXCREG];
c3_p regcp[MAXCREG]; c3_p regcp[MAXCREG];
rl_p regls[MAXCREG]; rl_p regls[MAXCREG];
c3_p cp,findcoerc(); c3_p findcoerc();
int sret; int sret;
token_t reptoken[MAXREPLLEN]; token_t reptoken[MAXREPLLEN];
int emrepllen,eminstr; int emrepllen,eminstr;
@ -262,7 +263,7 @@ if (Debug)
i=0; nregneeded = 0; i=0; nregneeded = 0;
while (i<tokpatlen && tp>=fakestack) { while (i<tokpatlen && tp>=fakestack) {
if (!match(tp,&machsets[tokexp[i]],0)) { if (!match(tp,&machsets[tokexp[i]],0)) {
cp = findcoerc(tp, &machsets[tokexp[i]]); register c3_p cp = findcoerc(tp, &machsets[tokexp[i]]);
if (cp==0) { if (cp==0) {
for (j=0;j<nregneeded;j++) for (j=0;j<nregneeded;j++)
regtp[j] -= (tp-fakestack+1); regtp[j] -= (tp-fakestack+1);
@ -295,7 +296,7 @@ if (Debug)
regtp[j] += stackpad; regtp[j] += stackpad;
tp = &fakestack[stackpad-1]; tp = &fakestack[stackpad-1];
while (i<tokpatlen && tp>=fakestack) { while (i<tokpatlen && tp>=fakestack) {
cp = findcoerc((token_p) 0, &machsets[tokexp[i]]); register c3_p cp = findcoerc((token_p) 0, &machsets[tokexp[i]]);
if (cp==0) { if (cp==0) {
assert(!toplevel); assert(!toplevel);
for (j=0;j<nregneeded;j++) for (j=0;j<nregneeded;j++)

2
mach/proto/cg/compute.c
View file

@ -105,7 +105,7 @@ string tostring(n) word n; {
result_t undefres= {EV_UNDEF}; result_t undefres= {EV_UNDEF};
result_t compute(node) node_p node; { result_t compute(node) register node_p node; {
result_t leaf1,leaf2,result; result_t leaf1,leaf2,result;
token_p tp; token_p tp;
int desc; int desc;