| 147 | } |
| 148 | |
| 149 | inline void resumeJump(SEXP token) { |
| 150 | if (isLongjumpSentinel(token)) { |
| 151 | token = getLongjumpToken(token); |
| 152 | } |
| 153 | ::R_ReleaseObject(token); |
| 154 | ::R_ContinueUnwind(token); |
| 155 | Rf_error("Internal error: Rcpp longjump failed to resume"); |
| 156 | } |
| 157 | |
| 158 | }} // namespace Rcpp::internal |
| 159 |
no test coverage detected