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

fixed error in previous commit

Browse source
This commit is contained in:
ceriel 1989-02-22 17:38:07 +00:00
parent f2c241fe3a
commit 19c225f75f
4 changed files with 44 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
mach/m68020/ncg/mach.c
View file

@ -232,7 +232,11 @@ regreturn()
register struct regsav_t *p; register struct regsav_t *p;
if (regnr > 1) { if (regnr > 1) {
#ifdef TBL68020
fprintf(codefile,"movem.l (-%ld,a6),", nlocals);
#else
fprintf(codefile,"movem.l -%ld(a6),", nlocals); fprintf(codefile,"movem.l -%ld(a6),", nlocals);
#endif
for (p = regsav; ;) { for (p = regsav; ;) {
fputs(p->rs_reg, codefile); fputs(p->rs_reg, codefile);
if (++p == &regsav[regnr]) break; if (++p == &regsav[regnr]) break;
@ -240,7 +244,12 @@ regreturn()
} }
putc('\n',codefile); putc('\n',codefile);
} else if (regnr == 1) { } else if (regnr == 1) {
fprintf(codefile,"move.l -%ld(a6),%s\n",nlocals); p = regsav;
#ifdef TBL68020
fprintf(codefile,"move.l (-%ld,a6),%s\n",nlocals, p->rs_reg);
#else
fprintf(codefile,"move.l -%ld(a6),%s\n",nlocals, p->rs_reg);
#endif
} }
fputs("unlk a6\nrts\n", codefile); fputs("unlk a6\nrts\n", codefile);
} }
@ -264,6 +273,7 @@ f_regsave()
} }
fputs(",(sp)\n", codefile); fputs(",(sp)\n", codefile);
} else if (regnr == 1) { } else if (regnr == 1) {
p = regsav;
fprintf(codefile,"move.l %s,(sp)\n",p->rs_reg); fprintf(codefile,"move.l %s,(sp)\n",p->rs_reg);
} }
/* initialise register-parameters */ /* initialise register-parameters */

12
mach/m68k2/ncg/mach.c
View file

@ -232,7 +232,11 @@ regreturn()
register struct regsav_t *p; register struct regsav_t *p;
if (regnr > 1) { if (regnr > 1) {
#ifdef TBL68020
fprintf(codefile,"movem.l (-%ld,a6),", nlocals);
#else
fprintf(codefile,"movem.l -%ld(a6),", nlocals); fprintf(codefile,"movem.l -%ld(a6),", nlocals);
#endif
for (p = regsav; ;) { for (p = regsav; ;) {
fputs(p->rs_reg, codefile); fputs(p->rs_reg, codefile);
if (++p == &regsav[regnr]) break; if (++p == &regsav[regnr]) break;
@ -240,7 +244,12 @@ regreturn()
} }
putc('\n',codefile); putc('\n',codefile);
} else if (regnr == 1) { } else if (regnr == 1) {
fprintf(codefile,"move.l -%ld(a6),%s\n",nlocals); p = regsav;
#ifdef TBL68020
fprintf(codefile,"move.l (-%ld,a6),%s\n",nlocals, p->rs_reg);
#else
fprintf(codefile,"move.l -%ld(a6),%s\n",nlocals, p->rs_reg);
#endif
} }
fputs("unlk a6\nrts\n", codefile); fputs("unlk a6\nrts\n", codefile);
} }
@ -264,6 +273,7 @@ f_regsave()
} }
fputs(",(sp)\n", codefile); fputs(",(sp)\n", codefile);
} else if (regnr == 1) { } else if (regnr == 1) {
p = regsav;
fprintf(codefile,"move.l %s,(sp)\n",p->rs_reg); fprintf(codefile,"move.l %s,(sp)\n",p->rs_reg);
} }
/* initialise register-parameters */ /* initialise register-parameters */

12
mach/m68k4/ncg/mach.c
View file

@ -232,7 +232,11 @@ regreturn()
register struct regsav_t *p; register struct regsav_t *p;
if (regnr > 1) { if (regnr > 1) {
#ifdef TBL68020
fprintf(codefile,"movem.l (-%ld,a6),", nlocals);
#else
fprintf(codefile,"movem.l -%ld(a6),", nlocals); fprintf(codefile,"movem.l -%ld(a6),", nlocals);
#endif
for (p = regsav; ;) { for (p = regsav; ;) {
fputs(p->rs_reg, codefile); fputs(p->rs_reg, codefile);
if (++p == &regsav[regnr]) break; if (++p == &regsav[regnr]) break;
@ -240,7 +244,12 @@ regreturn()
} }
putc('\n',codefile); putc('\n',codefile);
} else if (regnr == 1) { } else if (regnr == 1) {
fprintf(codefile,"move.l -%ld(a6),%s\n",nlocals); p = regsav;
#ifdef TBL68020
fprintf(codefile,"move.l (-%ld,a6),%s\n",nlocals, p->rs_reg);
#else
fprintf(codefile,"move.l -%ld(a6),%s\n",nlocals, p->rs_reg);
#endif
} }
fputs("unlk a6\nrts\n", codefile); fputs("unlk a6\nrts\n", codefile);
} }
@ -264,6 +273,7 @@ f_regsave()
} }
fputs(",(sp)\n", codefile); fputs(",(sp)\n", codefile);
} else if (regnr == 1) { } else if (regnr == 1) {
p = regsav;
fprintf(codefile,"move.l %s,(sp)\n",p->rs_reg); fprintf(codefile,"move.l %s,(sp)\n",p->rs_reg);
} }
/* initialise register-parameters */ /* initialise register-parameters */

12
mach/moon3/ncg/mach.c
View file

@ -232,7 +232,11 @@ regreturn()
register struct regsav_t *p; register struct regsav_t *p;
if (regnr > 1) { if (regnr > 1) {
#ifdef TBL68020
fprintf(codefile,"movem.l (-%ld,a6),", nlocals);
#else
fprintf(codefile,"movem.l -%ld(a6),", nlocals); fprintf(codefile,"movem.l -%ld(a6),", nlocals);
#endif
for (p = regsav; ;) { for (p = regsav; ;) {
fputs(p->rs_reg, codefile); fputs(p->rs_reg, codefile);
if (++p == &regsav[regnr]) break; if (++p == &regsav[regnr]) break;
@ -240,7 +244,12 @@ regreturn()
} }
putc('\n',codefile); putc('\n',codefile);
} else if (regnr == 1) { } else if (regnr == 1) {
fprintf(codefile,"move.l -%ld(a6),%s\n",nlocals); p = regsav;
#ifdef TBL68020
fprintf(codefile,"move.l (-%ld,a6),%s\n",nlocals, p->rs_reg);
#else
fprintf(codefile,"move.l -%ld(a6),%s\n",nlocals, p->rs_reg);
#endif
} }
fputs("unlk a6\nrts\n", codefile); fputs("unlk a6\nrts\n", codefile);
} }
@ -264,6 +273,7 @@ f_regsave()
} }
fputs(",(sp)\n", codefile); fputs(",(sp)\n", codefile);
} else if (regnr == 1) { } else if (regnr == 1) {
p = regsav;
fprintf(codefile,"move.l %s,(sp)\n",p->rs_reg); fprintf(codefile,"move.l %s,(sp)\n",p->rs_reg);
} }
/* initialise register-parameters */ /* initialise register-parameters */