Lines Matching defs:system
94 ficlWord *pStep = ficlSystemLookup(vm->callback.system, "step-break");
300 ficlVmSetBreak(vm, &(vm->callback.system->breakpoint));
325 ficlVmSetBreak(vm, &(vm->callback.system->breakpoint));
340 ficlWord *pStep = ficlSystemLookup(vm->callback.system, "step-break");
353 vm->callback.system->breakpoint.address = vm->ip + 1;
354 vm->callback.system->breakpoint.oldXT = vm->ip[1];
391 FICL_VM_ASSERT(vm, vm->callback.system->breakpoint.address);
392 FICL_VM_ASSERT(vm, vm->callback.system->breakpoint.oldXT);
399 vm->ip = (ficlIp)(vm->callback.system->breakpoint.address);
400 *vm->ip = vm->callback.system->breakpoint.oldXT;
405 pOnStep = ficlSystemLookup(vm->callback.system, "on-step");
412 word = vm->callback.system->breakpoint.oldXT;
511 * Signal the system to shut down - this causes ficlExec to return
809 ficlDictionary *dictionary = vm->callback.system->environment;
841 ficlSystem *system = vm->callback.system;
842 FICL_VM_ASSERT(vm, system);
848 if (system->parseList[i] != NULL) {
849 ficlVmTextOut(vm, system->parseList[i]->name);
869 ficlDictionarySetConstant(ficlSystemGetEnvironment(vm->callback.system),
883 ficlSystemGetEnvironment(vm->callback.system), vm->pad, value);
892 ficlSystemCompileTools(ficlSystem *system)
894 ficlDictionary *dictionary = ficlSystemGetDictionary(system);
895 ficlDictionary *environment = ficlSystemGetEnvironment(system);
897 FICL_SYSTEM_ASSERT(system, dictionary);
898 FICL_SYSTEM_ASSERT(system, environment);