Lines Matching defs:environment
1950 * environment-query CORE ( c-addr u -- FICL_FALSE | i*x FICL_TRUE )
1956 * with an attribute of the present environment. If the system treats the
1964 ficlDictionary *environment;
1970 environment = vm->callback.system->environment;
1974 word = ficlDictionaryLookup(environment, name);
3090 * Builds the primitive wordset and the environment-query namespace.
3097 ficlDictionary *environment = ficlSystemGetEnvironment(system);
3100 FICL_SYSTEM_ASSERT(system, environment);
3187 ficlDictionarySetPrimitive(dictionary, "environment?",
3304 ficlDictionarySetConstant(environment, "/counted-string",
3306 ficlDictionarySetConstant(environment, "/hold", FICL_PAD_SIZE);
3307 ficlDictionarySetConstant(environment, "/pad", FICL_PAD_SIZE);
3308 ficlDictionarySetConstant(environment, "address-unit-bits", 8);
3309 ficlDictionarySetConstant(environment, "core", FICL_TRUE);
3310 ficlDictionarySetConstant(environment, "core-ext", FICL_FALSE);
3311 ficlDictionarySetConstant(environment, "floored", FICL_FALSE);
3312 ficlDictionarySetConstant(environment, "max-char", UCHAR_MAX);
3313 ficlDictionarySetConstant(environment, "max-n", LONG_MAX);
3314 ficlDictionarySetConstant(environment, "max-u", ULONG_MAX);
3323 ficlDictionarySet2Constant(environment, "max-d", id);
3326 ficlDictionarySet2Constant(environment, "max-ud", id);
3329 ficlDictionarySetConstant(environment, "return-stack-cells",
3331 ficlDictionarySetConstant(environment, "stack-cells",
3366 ficlDictionarySetConstant(environment, "exception", FICL_TRUE);
3367 ficlDictionarySetConstant(environment, "exception-ext", FICL_TRUE);
3381 ficlDictionarySetConstant(environment, "locals", FICL_TRUE);
3382 ficlDictionarySetConstant(environment, "locals-ext", FICL_TRUE);
3383 ficlDictionarySetConstant(environment, "#locals", FICL_MAX_LOCALS);
3397 ficlDictionarySetConstant(environment, "memory-alloc", FICL_TRUE);