ficlDictionarySetConstant
ficlDictionarySetConstant(env, "loader_version", bootprog_rev);
(void) ficlDictionarySetConstant(env, "loader_version",
ficlDictionarySetConstant(ficlDictionary *dictionary, char *name,
(ficlDictionarySetConstant(dictionary, name, (ficlInteger)pointer))
ficlDictionarySetConstant(environment, "file", FICL_TRUE);
ficlDictionarySetConstant(environment, "file-ext", FICL_TRUE);
ficlDictionarySetConstant(environment, "file", FICL_FALSE);
ficlDictionarySetConstant(environment, "file-ext", FICL_FALSE);
(void) ficlDictionarySetConstant(environment, "max-float", data.i);
(void) ficlDictionarySetConstant(environment, "floating", FICL_FALSE);
(void) ficlDictionarySetConstant(environment, "floating-ext",
(void) ficlDictionarySetConstant(environment, "floating-stack",
(void) ficlDictionarySetConstant(environment, "floating", FICL_FALSE);
(void) ficlDictionarySetConstant(environment, "/counted-string",
(void) ficlDictionarySetConstant(environment, "/hold", FICL_PAD_SIZE);
(void) ficlDictionarySetConstant(environment, "/pad", FICL_PAD_SIZE);
(void) ficlDictionarySetConstant(environment, "address-unit-bits", 8);
(void) ficlDictionarySetConstant(environment, "core", FICL_TRUE);
(void) ficlDictionarySetConstant(environment, "core-ext", FICL_FALSE);
(void) ficlDictionarySetConstant(environment, "floored", FICL_FALSE);
(void) ficlDictionarySetConstant(environment, "max-char", UCHAR_MAX);
(void) ficlDictionarySetConstant(environment, "max-n", LONG_MAX);
(void) ficlDictionarySetConstant(environment, "max-u", ULONG_MAX);
(void) ficlDictionarySetConstant(environment, "return-stack-cells",
(void) ficlDictionarySetConstant(environment, "stack-cells",
(void) ficlDictionarySetConstant(environment, "exception", FICL_TRUE);
(void) ficlDictionarySetConstant(environment, "exception-ext",
(void) ficlDictionarySetConstant(environment, "locals", FICL_TRUE);
(void) ficlDictionarySetConstant(environment, "locals-ext", FICL_TRUE);
(void) ficlDictionarySetConstant(environment, "#locals",
(void) ficlDictionarySetConstant(environment, "memory-alloc",
(void) ficlDictionarySetConstant(dictionary, #token, token);
ficlDictionarySetConstant(dictionary, #token, token);
(void) ficlDictionarySetConstant(environment, "search-order",
(void) ficlDictionarySetConstant(environment, "search-order-ext",
(void) ficlDictionarySetConstant(environment, "wordlists",
(void) ficlDictionarySetConstant(environment, #name, name)
(void) ficlDictionarySetConstant(environment, "ficl-robust",
(void) ficlDictionarySetConstant(
(void) ficlDictionarySetConstant(environment, "tools", FICL_TRUE);
(void) ficlDictionarySetConstant(environment, "tools-ext", FICL_FALSE);