stand/ficl/math64.c

53 ** Returns the absolute value of an DPINT
55 DPINT m64Abs(DPINT x)
92 INTQR m64FlooredDivI(DPINT num, FICL_INT den)
133 ** Returns TRUE if the specified DPINT has its sign bit set.
135 int m64IsNegative(DPINT x)
167 ** Multiplies a pair of FICL_INTs and returns an DPINT result.
169 DPINT m64MulI(FICL_INT x, FICL_INT y)
196 ** Negates an DPINT by complementing and incrementing.
198 DPINT m64Negate(DPINT x)
212 ** Push an DPINT onto the specified stack in the order required
216 void  i64Push(FICL_STACK *pStack, DPINT i64)
233 ** Pops an DPINT off the stack in the order required by ANS Forth
237 DPINT i64Pop(FICL_STACK *pStack)
239     DPINT ret;
256 ** Divide an DPINT by a FICL_INT and return a FICL_INT quotient and a
261 INTQR m64SymmetricDivI(DPINT num, FICL_INT den)