Commit 408075e3 authored by Radford Neal's avatar Radford Neal

Merge branch '89' into 89-gradient

parents 18825f87 a3de1af8
......@@ -6,7 +6,13 @@
\encoding{UTF-8}
\section{CHANGES IN VERSION RELEASED 2019-00-00}{
\section{CHANGES IN VERSION RELEASED 2019-01-07}{
\subsection{INTRODUCTION}{
\itemize{
\item This is a maintenance release, with some bug fixes, minor feature
changes, and small performance improvements.
}}
\subsection{INSTALLATION}{
\itemize{
......
......@@ -697,7 +697,7 @@ void attribute_hidden InitGlobalEnv()
static inline void R_FlushGlobalCache(SEXP sym)
{
ATTRIB_W(sym) = R_NilValue;
if (ATTRIB_W(sym) != R_NilValue) ATTRIB_W(sym) = R_NilValue;
SET_BASE_CACHE(sym,0);
}
......@@ -730,19 +730,21 @@ static void R_FlushGlobalCacheFromUserTable(SEXP udb)
static inline void R_AddGlobalCacheBase(SEXP symbol)
{
ATTRIB_W(symbol) = R_NilValue;
if (ATTRIB_W(symbol) != R_NilValue) ATTRIB_W(symbol) = R_NilValue;
SET_BASE_CACHE (symbol, !IS_ACTIVE_BINDING(symbol));
}
static inline void R_AddGlobalCacheNonBase(SEXP symbol, SEXP place)
{
ATTRIB_W(symbol) = place;
if (symbol != R_MissingArg && symbol != R_MissingUnder)
ATTRIB_W(symbol) = place;
SET_BASE_CACHE (symbol, 0);
}
static inline void R_AddGlobalCacheNotFound(SEXP symbol)
{
ATTRIB_W(symbol) = R_UnboundValue;
if (symbol != R_MissingArg && symbol != R_MissingUnder)
ATTRIB_W(symbol) = R_UnboundValue;
SET_BASE_CACHE (symbol, 0);
}
......
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