… | |
… | |
734 | } |
734 | } |
735 | |
735 | |
736 | prev__cctx = prev->cctx; |
736 | prev__cctx = prev->cctx; |
737 | |
737 | |
738 | /* possibly "free" the cctx */ |
738 | /* possibly "free" the cctx */ |
739 | if (prev__cctx->idle_sp == STACKLEVEL && 0) |
739 | if (prev__cctx->idle_sp == STACKLEVEL) |
740 | { |
740 | { |
741 | /* I assume that STACKLEVEL is a stronger indicator than PL_top_env changes */ |
741 | /* I assume that STACKLEVEL is a stronger indicator than PL_top_env changes */ |
742 | assert (PL_top_env == prev__cctx->top_env); |
742 | assert (PL_top_env == prev__cctx->top_env); |
743 | |
743 | |
744 | prev->cctx = 0; |
744 | prev->cctx = 0; |