put ThOr back in shape.

This commit is contained in:
Vítor Santos Costa II 2010-04-09 11:56:07 +01:00
parent e9fce7c755
commit 8efec0b26e
2 changed files with 3 additions and 1 deletions

View File

@ -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();

View File

@ -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 =