diff options
| author | forsyth <forsyth@vitanuova.com> | 2010-07-22 11:56:14 +0100 |
|---|---|---|
| committer | forsyth <forsyth@vitanuova.com> | 2010-07-22 11:56:14 +0100 |
| commit | ce8e0d607a2bec33fcaac7237d0b5535e5b152a1 (patch) | |
| tree | 41e7f8c5524e6636b88085bb8d675e041ffd4c52 /limbo | |
| parent | 98a84ad18808c4c7892dac82539cd678dc45e952 (diff) | |
20100722
Diffstat (limited to 'limbo')
| -rw-r--r-- | limbo/asm.c | 18 | ||||
| -rw-r--r-- | limbo/sbl.c | 6 |
2 files changed, 12 insertions, 12 deletions
diff --git a/limbo/asm.c b/limbo/asm.c index cf9b2d5f..06820da0 100644 --- a/limbo/asm.c +++ b/limbo/asm.c @@ -144,7 +144,7 @@ asminitializer(long offset, Node *n) Bprint(bout, "\tword\t@mp+%ld,%ld\n", offset, lab->inst->pc); offset += IBY2WD; } - Bprint(bout, "\tword\t@mp+%ld,%d\n", offset, c->iwild ? c->iwild->pc : -1); + Bprint(bout, "\tword\t@mp+%ld,%ld\n", offset, c->iwild ? c->iwild->pc : -1); break; case Tgoto: c = n->ty->cse; @@ -188,16 +188,16 @@ asminitializer(long offset, Node *n) break; case Tiface: if(LDT) - Bprint(bout, "\tword\t@ldt+%d,%d\n", offset, (long)n->val); + Bprint(bout, "\tword\t@ldt+%ld,%ld\n", offset, (long)n->val); else - Bprint(bout, "\tword\t@mp+%d,%d\n", offset, (long)n->val); + Bprint(bout, "\tword\t@mp+%ld,%ld\n", offset, (long)n->val); offset += IBY2WD; for(id = n->decl->ty->ids; id != nil; id = id->next){ offset = align(offset, IBY2WD); if(LDT) - Bprint(bout, "\text\t@ldt+%d,0x%lux,\"", offset, sign(id)); + Bprint(bout, "\text\t@ldt+%ld,0x%lux,\"", offset, sign(id)); else - Bprint(bout, "\text\t@mp+%d,0x%lux,\"", offset, sign(id)); + Bprint(bout, "\text\t@mp+%ld,0x%lux,\"", offset, sign(id)); dotlen = 0; idlen = id->sym->len + 1; if(id->dot->ty->kind == Tadt){ @@ -236,18 +236,18 @@ asmexc(Except *es) id = e->desc->id; else id = -1; - Bprint(bout, "\texception\t%d, %d, %d, %d, %d, %d\n", getpc(e->p1), getpc(e->p2), o, id, c->nlab, e->ne); + Bprint(bout, "\texception\t%ld, %ld, %d, %d, %d, %d\n", getpc(e->p1), getpc(e->p2), o, id, c->nlab, e->ne); for(i = 0; i < c->nlab; i++){ lab = &c->labs[i]; d = lab->start->decl; if(lab->start->ty->kind == Texception) d = d->init->decl; - Bprint(bout, "\texctab\t\"%s\", %d\n", d->sym->name, lab->inst->pc); + Bprint(bout, "\texctab\t\"%s\", %ld\n", d->sym->name, lab->inst->pc); } if(c->iwild == nil) Bprint(bout, "\texctab\t*, %d\n", -1); else - Bprint(bout, "\texctab\t*, %d\n", c->iwild->pc); + Bprint(bout, "\texctab\t*, %ld\n", c->iwild->pc); } } @@ -283,7 +283,7 @@ asminst(Inst *in) if(in->op == INOOP) continue; if(in->pc % 10 == 0) - Bprint(bout, "#%d\n", in->pc); + Bprint(bout, "#%ld\n", in->pc); Bprint(bout, "%I\n", in); } } diff --git a/limbo/sbl.c b/limbo/sbl.c index 0a0bf52c..5ffce98d 100644 --- a/limbo/sbl.c +++ b/limbo/sbl.c @@ -317,7 +317,7 @@ sbltype(Type *t, int force) break; case Ttuple: case Texception: - Bprint(bsym, "%c%d.", sbltname[t->kind], t->size); + Bprint(bsym, "%c%ld.", sbltname[t->kind], t->size); sbldecl(t->ids, Dfield); break; case Tadt: @@ -327,7 +327,7 @@ sbltype(Type *t, int force) Bputc(bsym, sbltname[t->kind]); if(d->dot != nil && !isimpmod(d->dot->sym)) Bprint(bsym, "%s->", d->dot->sym->name); - Bprint(bsym, "%s %s%d\n", d->sym->name, sblsrcconv(buf, buf+sizeof(buf), &d->src), d->ty->size); + Bprint(bsym, "%s %s%ld\n", d->sym->name, sblsrcconv(buf, buf+sizeof(buf), &d->src), d->ty->size); sbldecl(t->ids, Dfield); if(t->tags != nil){ Bprint(bsym, "%d\n", t->decl->tag); @@ -337,7 +337,7 @@ sbltype(Type *t, int force) if(lastt == tg->ty){ Bputc(bsym, '\n'); }else{ - Bprint(bsym, "%d\n", tg->ty->size); + Bprint(bsym, "%ld\n", tg->ty->size); sbldecl(tg->ty->ids, Dfield); } lastt = tg->ty; |
