… | … | ||
---|---|---|---|
694 | prev__cctx = prev->cctx; | 694 | prev__cctx = prev->cctx; |
695 | 695 | ||
696 | /* possibly "free" the cctx */ | 696 | /* possibly "free" the cctx */ |
697 | if (prev__cctx->idle_sp == STACKLEVEL) | 697 | if (prev__cctx->idle_sp == STACKLEVEL) |
698 | { | 698 | { |
699 | assert (PL_top_env == prev__cctx->top_env);//D | ||
699 | cctx_put (prev__cctx); | 700 | cctx_put (prev__cctx); |
700 | prev->cctx = 0; | 701 | prev->cctx = 0; |
701 | } | 702 | } |
702 | 703 | ||
703 | if (!next->cctx) | 704 | if (!next->cctx) |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |