Fix printf args for 64-bit archs
Sponsored by: The FreeBSD Foundation
This commit is contained in:
parent
6cf1ada9e1
commit
f58d027be1
Notes:
svn2git
2020-12-20 02:59:44 +00:00
svn path=/head/; revision=264262
@ -201,7 +201,7 @@ static void seeColon(FICL_VM *pVM, CELL *pc)
|
||||
*cp++ = '>';
|
||||
else
|
||||
*cp++ = ' ';
|
||||
cp += sprintf(cp, "%3d ", pc-param0);
|
||||
cp += sprintf(cp, "%3d ", (int)(pc-param0));
|
||||
|
||||
if (isAFiclWord(pd, pFW))
|
||||
{
|
||||
@ -239,40 +239,40 @@ static void seeColon(FICL_VM *pVM, CELL *pc)
|
||||
case IF:
|
||||
c = *++pc;
|
||||
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
|
||||
sprintf(cp, "until (branch %d)", pc+c.i-param0);
|
||||
sprintf(cp, "until (branch %d)", (int)(pc+c.i-param0));
|
||||
break;
|
||||
case BRANCH:
|
||||
c = *++pc;
|
||||
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)
|
||||
sprintf(cp, "else (branch %d)", pc+c.i-param0);
|
||||
sprintf(cp, "else (branch %d)", (int)(pc+c.i-param0));
|
||||
else
|
||||
sprintf(cp, "endof (branch %d)", pc+c.i-param0);
|
||||
sprintf(cp, "endof (branch %d)", (int)(pc+c.i-param0));
|
||||
break;
|
||||
|
||||
case OF:
|
||||
c = *++pc;
|
||||
sprintf(cp, "of (branch %d)", pc+c.i-param0);
|
||||
sprintf(cp, "of (branch %d)", (int)(pc+c.i-param0));
|
||||
break;
|
||||
|
||||
case QDO:
|
||||
c = *++pc;
|
||||
sprintf(cp, "?do (leave %d)", (CELL *)c.p-param0);
|
||||
sprintf(cp, "?do (leave %d)", (int)((CELL *)c.p-param0));
|
||||
break;
|
||||
case DO:
|
||||
c = *++pc;
|
||||
sprintf(cp, "do (leave %d)", (CELL *)c.p-param0);
|
||||
sprintf(cp, "do (leave %d)", (int)((CELL *)c.p-param0));
|
||||
break;
|
||||
case LOOP:
|
||||
c = *++pc;
|
||||
sprintf(cp, "loop (branch %d)", pc+c.i-param0);
|
||||
sprintf(cp, "loop (branch %d)", (int)(pc+c.i-param0));
|
||||
break;
|
||||
case PLOOP:
|
||||
c = *++pc;
|
||||
sprintf(cp, "+loop (branch %d)", pc+c.i-param0);
|
||||
sprintf(cp, "+loop (branch %d)", (int)(pc+c.i-param0));
|
||||
break;
|
||||
default:
|
||||
sprintf(cp, "%.*s", pFW->nName, pFW->name);
|
||||
|
Loading…
Reference in New Issue
Block a user