FICL_UNS
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y)
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y)
#if !defined FICL_UNS
FICL_UNS hi;
FICL_UNS lo;
FICL_UNS quot;
FICL_UNS rem;
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y);
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y);
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y)
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y)
#if !defined FICL_UNS
FICL_UNS hi;
FICL_UNS lo;
FICL_UNS quot;
FICL_UNS rem;
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y);
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y);
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y)
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y)
#if !defined FICL_UNS
FICL_UNS hi;
FICL_UNS lo;
FICL_UNS quot;
FICL_UNS rem;
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y);
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y);
void dictAppendUNS(FICL_DICT *pDict, FICL_UNS u)
FICL_UNS nCmp = si.count;
void ficlSetEnv(FICL_SYSTEM *pSys, char *name, FICL_UNS value)
void ficlSetEnvD(FICL_SYSTEM *pSys, char *name, FICL_UNS hi, FICL_UNS lo)
void ficlSetEnv (FICL_SYSTEM *pSys, char *name, FICL_UNS value);
void ficlSetEnvD(FICL_SYSTEM *pSys, char *name, FICL_UNS hi, FICL_UNS lo);
#define FICL_TRUE (~(FICL_UNS)0)
FICL_UNS u;
FICL_UNS count;
#define SI_SETLEN(si, len) (si.count = (FICL_UNS)(len))
FICL_UNS nCells; /* size of the stack */
FICL_UNS stackPopUNS (FICL_STACK *pStack);
void stackPushUNS (FICL_STACK *pStack, FICL_UNS u);
FICL_UNS state; /* compiling or interpreting */
FICL_UNS base; /* number conversion base */
int isPowerOfTwo(FICL_UNS u);
char *ultoa(FICL_UNS value, char *string, int radix );
int strincmp(char *cp1, char *cp2, FICL_UNS count);
void dictAppendUNS (FICL_DICT *pDict, FICL_UNS u);
FICL_UNS x, y;
FICL_UNS x0, y0, x1, y1, wd;
FICL_UNS x0, y0, x1, y1, x2, y2, width;
FICL_UNS x1, x2, y1, y2, fill;
FICL_UNS x1, x2, y1, y2;
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y)
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y)
#if !defined FICL_UNS
FICL_UNS hi;
FICL_UNS lo;
FICL_UNS quot;
FICL_UNS rem;
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y);
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y);
stackPushUNS(pVM->pStack, (FICL_UNS) time(NULL));
uqr = ficlLongDiv(m64CastIU(num), (FICL_UNS)den);
DPUNS m64Mac(DPUNS u, FICL_UNS mul, FICL_UNS add)
uqr = ficlLongDiv(m64CastIU(num), (FICL_UNS)den);
qr = ficlLongDiv(ud, (FICL_UNS)base);
qr = ficlLongDiv(ud, (FICL_UNS)base);
qr = ficlLongDiv(ud, (FICL_UNS)base);
qr = ficlLongDiv(ud, (FICL_UNS)base);
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y)
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y)
DPUNS m64Mac(DPUNS u, FICL_UNS mul, FICL_UNS add);
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y)
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y)
#if !defined FICL_UNS
FICL_UNS hi;
FICL_UNS lo;
FICL_UNS quot;
FICL_UNS rem;
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y);
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y);
if (!strincmp(SI_PTR(si), pFW->name, (FICL_UNS)n))
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y)
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y)
#if !defined FICL_UNS
FICL_UNS hi;
FICL_UNS lo;
FICL_UNS quot;
FICL_UNS rem;
DPUNS ficlLongMul(FICL_UNS x, FICL_UNS y);
UNSQR ficlLongDiv(DPUNS q, FICL_UNS y);
FICL_UNS nBuckets;
FICL_UNS stackPopUNS(FICL_STACK *pStack)
void stackPushUNS(FICL_STACK *pStack, FICL_UNS u)
stackPushUNS(pVM->pStack, (FICL_UNS)now);
ficlSetEnv(pVM->pSys, pVM->pad, (FICL_UNS)value);
FICL_UNS count = 0;
int isPowerOfTwo(FICL_UNS u)
FICL_UNS t = 2;
pwr = isPowerOfTwo((FICL_UNS)radix);
FICL_UNS v = (FICL_UNS) value;
FICL_UNS mask = (FICL_UNS) ~(-1 << pwr);
v.lo = (FICL_UNS)value;
result = ficlLongDiv(v, (FICL_UNS)radix);
char *ultoa(FICL_UNS value, char *string, int radix )
result = ficlLongDiv(ud, (FICL_UNS)radix);
int strincmp(char *cp1, char *cp2, FICL_UNS count)
PUSHUNS((FICL_UNS)*pw);
PUSHUNS((FICL_UNS)*pw);
PUSHUNS((FICL_UNS)*pc);
FICL_UNS flag;
FICL_UNS fixupCount;
FICL_UNS a, b;
FICL_UNS fixupCount;
FICL_UNS u1, u2;
FICL_UNS u1, u2;
FICL_UNS u;
FICL_UNS count;
FICL_UNS base = pVM->base;
FICL_UNS ch;
FICL_UNS digit;
FICL_UNS count, len;
PUSHUNS((FICL_UNS)(si.cp[0]));
FICL_UNS count;
FICL_UNS count = stackPopUNS(pVM->pStack);
FICL_UNS u;
FICL_UNS u1;
FICL_UNS nBits;
FICL_UNS x1;
FICL_UNS nBits;
FICL_UNS x1;
FICL_UNS u2;
FICL_UNS u1;
FICL_UNS u;
FICL_UNS u1, u2, uMin;
FICL_UNS u;
FICL_UNS u;