replaced some %D's

This commit is contained in:
ceriel 1987-02-09 17:28:22 +00:00
parent 8b15b193a2
commit 17ddf81681
8 changed files with 23 additions and 23 deletions

View file

@ -101,7 +101,7 @@ STATIC entity_p result_local(size, l)
if (INSTR(l)==op_stl && size==ws || INSTR(l)==op_sdl && size==2*ws) {
enp = getentity(l, &dummy);
if (is_regvar(enp->en_loc)) {
OUTTRACE("save local found, %D(LB)", enp->en_loc);
OUTTRACE("save local found, %ld(LB)", enp->en_loc);
return enp;
}
}

View file

@ -35,7 +35,7 @@ STATIC showinstr(lnp)
fprintf(stderr," %d", OBJ(lnp)->o_id);
break;
case OPOFFSET:
fprintf(stderr," %D", OFFSET(lnp));
fprintf(stderr," %ld", OFFSET(lnp));
break;
default:
fprintf(stderr," ?");
@ -114,26 +114,26 @@ OUTENTITIES()
register entity_p rep = en_elem(i);
fprintf(stderr,"%s,", enkinds[rep->en_kind]);
fprintf(stderr,"size %D,", rep->en_size);
fprintf(stderr,"size %ld,", rep->en_size);
fprintf(stderr,"valno %d,", rep->en_vn);
switch (rep->en_kind) {
case ENCONST:
fprintf(stderr,"$%D\n", rep->en_val);
fprintf(stderr,"$%ld\n", rep->en_val);
break;
case ENLOCAL:
case ENALOCAL:
fprintf(stderr,"%D(LB)\n", rep->en_loc);
fprintf(stderr,"%ld(LB)\n", rep->en_loc);
break;
case ENINDIR:
fprintf(stderr,"*%d\n", rep->en_ind);
break;
case ENOFFSETTED:
case ENAOFFSETTED:
fprintf(stderr,"%D(%d)\n", rep->en_off, rep->en_base);
fprintf(stderr,"%ld(%d)\n", rep->en_off, rep->en_base);
break;
case ENALOCBASE:
case ENAARGBASE:
fprintf(stderr,"%D levels\n", rep->en_levels);
fprintf(stderr,"%ld levels\n", rep->en_levels);
break;
case ENARRELEM:
fprintf(stderr,"%d[%d], ",rep->en_arbase,rep->en_index);

View file

@ -270,7 +270,7 @@ eliminate(pp)
if (ravp->av_saveloc != (entity_p) 0) {
tmp = ravp->av_saveloc->en_loc;
mes = find_mesreg(tmp);
OUTVERBOSE("re-using %D(LB)", tmp);
OUTVERBOSE("re-using %ld(LB)", tmp);
} else {
tmp = tmplocal(pp, ravp->av_size);
mes = gen_mesreg(tmp, ravp, pp);

View file

@ -436,7 +436,7 @@ print_items(items,p)
printf("id of external = %d\n",
item->i_t.it_obj->o_id);
} else {
printf("offset = %D\n",
printf("offset = %ld\n",
item->i_t.it_off);
}
printf("regtype = %s\n",str_regtypes[item->it_regtype]);
@ -476,7 +476,7 @@ print_allocs(list)
fprintf(stderr,"id = %d]\n", item->i_t.it_proc->p_id);
break;
default:
fprintf(stderr,"offset = %D]\n", item->i_t.it_off);
fprintf(stderr,"offset = %ld]\n", item->i_t.it_off);
}
fprintf(stderr,"#usages(static) = %d\n",al->al_susecount);
fprintf(stderr,"#usages(dyn) = %d\n",al->al_dusecount);
@ -494,7 +494,7 @@ print_allocs(list)
}
fprintf(stderr,"} \n");
fprintf(stderr,"profits = %d\n",al->al_profits);
fprintf(stderr,"dummy local = %D\n",al->al_dummy);
fprintf(stderr,"dummy local = %ld\n",al->al_dummy);
fprintf(stderr,"regnr = %d\n",al->al_regnr);
}
}

View file

@ -90,7 +90,7 @@ allocscore(itemtyp,localtyp,size,off,totyp,time_out,space_out)
*time_out = (m == (cond_p) 0 ? -1 : map_value(m,off,TRUE));
*space_out = (m == (cond_p) 0 ? -1 : map_value(m,off,FALSE));
/*
printf("itemtyp = %d, localtyp = %d off = %D\n",itemtyp,localtyp,off);
printf("itemtyp = %d, localtyp = %d off = %ld\n",itemtyp,localtyp,off);
printf("ALLOCSCORE = (%d,%d)\n",*time_out,*space_out);
*/
}
@ -126,7 +126,7 @@ opening_cost(itemtyp,localtyp,off,time_out,space_out)
*time_out = (m == (cond_p) 0 ? 1000 : map_value(m,off,TRUE));
*space_out = (m == (cond_p) 0 ? 1000 : map_value(m,off,FALSE));
/*
printf("itemtyp = %d, localtyp = %d off = %D\n",itemtyp,localtyp,off);
printf("itemtyp = %d, localtyp = %d off = %ld\n",itemtyp,localtyp,off);
printf("OPEN_COST = (%d,%d)\n",*time_out,*space_out);
*/
}

View file

@ -28,10 +28,10 @@ extern byte em_flag[];
#define space1() printf(" ")
char format[] = " %-11s%d\n";
char lformat[] = " %-11s%D\n";
char lformat[] = " %-11s%ld\n";
char sformat[] = " %-10s%s\n";
char dformat[] = " %-11s%d\n";
char oformat[] = " %-11s%D\n";
char oformat[] = " %-11s%ld\n";
@ -263,7 +263,7 @@ showinstr()
printf(" *%d",getshort());
break;
case OPOFFSET:
printf(" %D", getoff());
printf(" %ld", getoff());
break;
case OPLIST:
arglist();
@ -296,7 +296,7 @@ arglist()
printf(" *%d",getshort());
break;
case ARGOFF:
printf(" %D", getoff());
printf(" %ld", getoff());
break;
case ARGICN:
case ARGUCN:

View file

@ -266,7 +266,7 @@ pr_localtab() {
for (i = 1; i <= nrlocals; i++) {
lc = locals[i];
printf("LOCAL %d\n",i);
printf(" offset= %D\n",lc->lc_off);
printf(" offset= %ld\n",lc->lc_off);
printf(" size= %d\n",lc->lc_size);
printf(" flags= %d\n",lc->lc_flags);
}
@ -305,7 +305,7 @@ pr_defs()
printf("%d\n",SHORT(l));
break;
case OPOFFSET:
printf("%D\n",OFFSET(l));
printf("%ld\n",OFFSET(l));
break;
case OPOBJECT:
printf("%d\n",OBJ(l)->o_id);

View file

@ -323,21 +323,21 @@ fold_var(old,new,b)
if (TYPE(old) == OPOBJECT) {
printf("global var.");
} else {
printf("local var. with off. %D",off_set(old));
printf("local var. with off. %ld",off_set(old));
find_local(off_set(old),&nr,&ok);
assert(ok);
loc = locals[nr];
printf(",score %D",loc->lc_score);
printf(",score %ld",loc->lc_score);
}
printf(" replaced by ");
if (TYPE(new) == OPOBJECT) {
printf("global var.");
} else {
printf("local var. with off. %D",off_set(new));
printf("local var. with off. %ld",off_set(new));
find_local(off_set(new),&nr,&ok);
assert(ok);
loc = locals[nr];
printf(",score %D",loc->lc_score);
printf(",score %ld",loc->lc_score);
}
printf("\n");
END DEBUG */