1- // -*- mode: C++; c-indent-level: 4; c-basic-offset: 4; indent-tabs-mode: nil; -*-
2- //
1+
32// exceptions.h: Rcpp R/C++ interface class library -- exceptions
43//
5- // Copyright (C) 2010 - 2017 Dirk Eddelbuettel and Romain Francois
4+ // Copyright (C) 2010 - 2020 Dirk Eddelbuettel and Romain Francois
65//
76// This file is part of Rcpp.
87//
@@ -130,7 +129,7 @@ inline SEXP longjumpSentinel(SEXP token) {
130129 return sentinel;
131130}
132131
133- inline bool isLongjumpSentinel (SEXP x) {
132+ inline bool isLongjumpSentinel (SEXP x) { // #nocov start
134133 return
135134 Rf_inherits (x, " Rcpp:longjumpSentinel" ) &&
136135 TYPEOF (x) == VECSXP &&
@@ -148,7 +147,7 @@ inline void resumeJump(SEXP token) {
148147 ::R_ReleaseObject (token);
149148#if (defined(R_VERSION) && R_VERSION >= R_Version(3, 5, 0))
150149 ::R_ContinueUnwind (token);
151- #endif
150+ #endif // #nocov end
152151 Rf_error (" Internal error: Rcpp longjump failed to resume" );
153152}
154153
@@ -200,7 +199,7 @@ namespace Rcpp {
200199 virtual const char * what () const throw() { return __MESSAGE__ ; } \
201200 } ;
202201
203- RCPP_SIMPLE_EXCEPTION_CLASS (not_a_matrix, " Not a matrix." ) // #nocov start
202+ RCPP_SIMPLE_EXCEPTION_CLASS (not_a_matrix, " Not a matrix." ) // #nocov start
204203 RCPP_SIMPLE_EXCEPTION_CLASS (parse_error, " Parse error." )
205204 RCPP_SIMPLE_EXCEPTION_CLASS (not_s4, " Not an S4 object." )
206205 RCPP_SIMPLE_EXCEPTION_CLASS (not_reference, " Not an S4 object of a reference class." )
@@ -221,10 +220,10 @@ namespace Rcpp {
221220 RCPP_EXCEPTION_CLASS (binding_is_locked, " Binding is locked" )
222221 RCPP_EXCEPTION_CLASS (no_such_namespace, " No such namespace" )
223222 RCPP_EXCEPTION_CLASS (function_not_exported, " Function not exported" )
224- RCPP_EXCEPTION_CLASS (eval_error, " Evaluation error" ) // #nocov end
223+ RCPP_EXCEPTION_CLASS (eval_error, " Evaluation error" )
225224
226225 // Promoted
227- RCPP_ADVANCED_EXCEPTION_CLASS (not_compatible, " Not compatible" )
226+ RCPP_ADVANCED_EXCEPTION_CLASS (not_compatible, " Not compatible" ) // #nocov end
228227 RCPP_ADVANCED_EXCEPTION_CLASS (index_out_of_bounds, " Index is out of bounds" )
229228
230229 #undef RCPP_SIMPLE_EXCEPTION_CLASS
0 commit comments