release 1.0.7

Author: eddelbuettel

ChangeLog

@@ -1,4 +1,4 @@
-2021-07-03  Dirk Eddelbuettel  <[email protected]>
+2021-07-06  Dirk Eddelbuettel  <[email protected]>
 
         * DESCRIPTION (Date, Version): Release 1.0.7
 
@@ -8,6 +8,11 @@
         * inst/bib/Rcpp.bib: Idem
 	* vignettes/pdf/*: Rebuilt
 
+2021-07-05  Iñaki Ucar  <[email protected]>
+
+	* src/barrier.cpp (Rcpp_precious_remove): Protect from call with
+	wrong token when unloading modules compiled under earlier version
+
 2021-07-02  Dirk Eddelbuettel  <[email protected]>
 
 	* inst/include/Rcpp/r/headers.h: Update notice as January 2022

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: Rcpp
 Title: Seamless R and C++ Integration
 Version: 1.0.7
-Date: 2021-07-03
+Date: 2021-07-06
 Author: Dirk Eddelbuettel, Romain Francois, JJ Allaire, Kevin Ushey, Qiang Kou,
  Nathan Russell, Inaki Ucar, Douglas Bates and John Chambers
 Maintainer: Dirk Eddelbuettel <[email protected]>

inst/NEWS.Rd

@@ -3,7 +3,7 @@
 \newcommand{\ghpr}{\href{https://github.com/RcppCore/Rcpp/pull/#1}{##1}}
 \newcommand{\ghit}{\href{https://github.com/RcppCore/Rcpp/issues/#1}{##1}}
 
-\section{Changes in Rcpp release version 1.0.7 (2021-07-03)}{
+\section{Changes in Rcpp release version 1.0.7 (2021-07-06)}{
   \itemize{
     \item Changes in Rcpp API:
     \itemize{

src/barrier.cpp

@@ -116,7 +116,7 @@ SEXP Rcpp_precious_preserve(SEXP object) {
 }
 // [[Rcpp::register]]
 void Rcpp_precious_remove(SEXP token) {
-    if (token == R_NilValue) {
+    if (token == R_NilValue || TYPEOF(token) != LISTSXP) {
         return;
     }
     SEXP before = CAR(token);