put ThOr back in shape.
This commit is contained in:
parent
e9fce7c755
commit
8efec0b26e
@ -2414,8 +2414,10 @@ YAP_Init(YAP_init_args *yap_init)
|
||||
}
|
||||
yap_flags[FAST_BOOT_FLAG] = yap_init->FastBoot;
|
||||
#if defined(YAPOR) || defined(TABLING)
|
||||
#ifdef TABLING
|
||||
/* make sure we initialise this field */
|
||||
GLOBAL_root_dep_fr = NULL;
|
||||
#endif
|
||||
make_root_frames();
|
||||
#ifdef YAPOR
|
||||
init_workers();
|
||||
|
@ -70,7 +70,7 @@ void make_root_choice_point(void) {
|
||||
and convert back to our own stack;
|
||||
*/
|
||||
OldLCL0 = LCL0;
|
||||
LCL0 = ThreadHandle[0].current_yaam_regs->LCL0_;
|
||||
LCL0 = FOREIGN_ThreadHandle(0).current_yaam_regs->LCL0_;
|
||||
imageB = Get_GLOBAL_root_cp();
|
||||
/* we know B */
|
||||
B->cp_tr = TR =
|
||||
|
Reference in New Issue
Block a user