ficlStackDepth
FICL_PLATFORM_EXTERN int ficlStackDepth(ficlStack *stack);
i = ficlStackDepth(vm->floatStack);
i = ficlStackDepth(vm->dataStack);
depth = ficlStackDepth(stack);
stack->name, ficlStackDepth(stack), (unsigned long)stack->top);
stack->name, ficlStackDepth(stack), (unsigned)stack->top);
(void) sprintf(buffer, "[%d] ", ficlStackDepth(stack));