r_message.cpp

#include <Rcpp.h>
using namespace Rcpp;

// [[Rcpp::export]]
void r_message(std::string text)
{
    Rcpp::Function msg("message");
    msg(text);
}

/*** R
r_message("not suppressed")
suppressMessages(r_message("suppressed"))
message("not suppressed")
suppressMessages(message("suppressed"))
*/

Comments on twitter:

could it be an issue of environments? That's where condition handlers attach. Is message() called in the right frame? — @tslumley

 

to ensure C++ destructors are always run, I think Rcpp broke that in a recent release — @hadleywickham