Fix printf args for 64-bit archs

Sponsored by:	The FreeBSD Foundation
This commit is contained in:
Ed Maste 2014-04-08 18:02:32 +00:00
parent 6cf1ada9e1
commit f58d027be1

View File

@ -201,7 +201,7 @@ static void seeColon(FICL_VM *pVM, CELL *pc)
*cp++ = '>'; *cp++ = '>';
else else
*cp++ = ' '; *cp++ = ' ';
cp += sprintf(cp, "%3d ", pc-param0); cp += sprintf(cp, "%3d ", (int)(pc-param0));
if (isAFiclWord(pd, pFW)) if (isAFiclWord(pd, pFW))
{ {
@ -239,40 +239,40 @@ static void seeColon(FICL_VM *pVM, CELL *pc)
case IF: case IF:
c = *++pc; c = *++pc;
if (c.i > 0) if (c.i > 0)
sprintf(cp, "if / while (branch %d)", pc+c.i-param0); sprintf(cp, "if / while (branch %d)", (int)(pc+c.i-param0));
else else
sprintf(cp, "until (branch %d)", pc+c.i-param0); sprintf(cp, "until (branch %d)", (int)(pc+c.i-param0));
break; break;
case BRANCH: case BRANCH:
c = *++pc; c = *++pc;
if (c.i == 0) if (c.i == 0)
sprintf(cp, "repeat (branch %d)", pc+c.i-param0); sprintf(cp, "repeat (branch %d)", (int)(pc+c.i-param0));
else if (c.i == 1) else if (c.i == 1)
sprintf(cp, "else (branch %d)", pc+c.i-param0); sprintf(cp, "else (branch %d)", (int)(pc+c.i-param0));
else else
sprintf(cp, "endof (branch %d)", pc+c.i-param0); sprintf(cp, "endof (branch %d)", (int)(pc+c.i-param0));
break; break;
case OF: case OF:
c = *++pc; c = *++pc;
sprintf(cp, "of (branch %d)", pc+c.i-param0); sprintf(cp, "of (branch %d)", (int)(pc+c.i-param0));
break; break;
case QDO: case QDO:
c = *++pc; c = *++pc;
sprintf(cp, "?do (leave %d)", (CELL *)c.p-param0); sprintf(cp, "?do (leave %d)", (int)((CELL *)c.p-param0));
break; break;
case DO: case DO:
c = *++pc; c = *++pc;
sprintf(cp, "do (leave %d)", (CELL *)c.p-param0); sprintf(cp, "do (leave %d)", (int)((CELL *)c.p-param0));
break; break;
case LOOP: case LOOP:
c = *++pc; c = *++pc;
sprintf(cp, "loop (branch %d)", pc+c.i-param0); sprintf(cp, "loop (branch %d)", (int)(pc+c.i-param0));
break; break;
case PLOOP: case PLOOP:
c = *++pc; c = *++pc;
sprintf(cp, "+loop (branch %d)", pc+c.i-param0); sprintf(cp, "+loop (branch %d)", (int)(pc+c.i-param0));
break; break;
default: default:
sprintf(cp, "%.*s", pFW->nName, pFW->name); sprintf(cp, "%.*s", pFW->nName, pFW->name);