Commit 4bd65139 authored by Radford Neal's avatar Radford Neal

tweak to endcontext

parent e8aab7f2
......@@ -323,7 +323,7 @@ void endcontext(RCNTXT * cptr)
{
R_HandlerStack = cptr->handlerstack;
R_RestartStack = cptr->restartstack;
if (cptr->cloenv != R_NilValue && cptr->conexit != R_NilValue ) {
if (cptr->conexit != R_NilValue && cptr->cloenv != R_NilValue) {
SEXP s = cptr->conexit;
Rboolean savevis = R_Visible;
cptr->conexit = R_NilValue; /* prevent recursion */
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment