FICL_PAD_SIZE
char pad[FICL_PAD_SIZE]; /* the scratch area (see above) */
#if !defined FICL_PAD_SIZE
if (FICL_STRING_GET_LENGTH(name) > FICL_PAD_SIZE - 1)
FICL_STRING_SET_LENGTH(name, FICL_PAD_SIZE - 1);
(void) ficlDictionarySetConstant(environment, "/hold", FICL_PAD_SIZE);
(void) ficlDictionarySetConstant(environment, "/pad", FICL_PAD_SIZE);
if (FICL_STRING_GET_LENGTH(s) >= FICL_PAD_SIZE)
FICL_STRING_SET_LENGTH(s, FICL_PAD_SIZE - 1);