Rcpp :: stop () вылетает R под g ++

Question

Вот простая тестовая функция, которая вызывает Rcpp::stop()

#include <Rcpp.h>

NumericVector dostop()
{
  Rcpp::stop("foo");
  NumericVector x(1);

  return x;
}

При использовании clang в OS X она работает, как и ожидалось:

> library(Rcpp)
> sourceCpp('stop.cpp')
> dostop()
Error in dostop() : foo
> 

Однако при использовании g ++ в Linux этосбой функции R:

> library(Rcpp)
> sourceCpp('stop.cpp')
> dostop()
*** glibc detected *** /share/apps/R/3.3.3/lib64/R/bin/exec/R: free(): invalid pointer: 0x0000000001c29ff8 ***
======= Backtrace: =========
/lib64/libc.so.6[0x3407c75f4e]
/lib64/libc.so.6[0x3407c78cad]
/tmp/RtmpiUT8Xb/sourceCpp-x86_64-pc-linux-gnu-1.0.1/sourcecpp_7dc862cd8f07/sourceCpp_2.so(_Z31exception_to_condition_templateIN4Rcpp9exceptionEEP7SEXPRECRKT_b+0x1da)[0x7f6fab831287]
/tmp/RtmpiUT8Xb/sourceCpp-x86_64-pc-linux-gnu-1.0.1/sourcecpp_7dc862cd8f07/sourceCpp_2.so(_Z29rcpp_exception_to_r_conditionRKN4Rcpp9exceptionE+0x29)[0x7f6fab83073d]
/tmp/RtmpiUT8Xb/sourceCpp-x86_64-pc-linux-gnu-1.0.1/sourcecpp_7dc862cd8f07/sourceCpp_2.so(sourceCpp_1_dostop+0x27d)[0x7f6fab82dd02]
/share/apps/R/3.3.3/lib64/R/lib/libR.so(+0xdc4fe)[0x7f6fb4ea04fe]
(and many more lines of similar)

Вот соответствующий sessionInfo:

> sessionInfo()
R version 3.3.3 (2017-03-06)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Red Hat Enterprise Linux Workstation release 6.6 (Santiago)

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C              
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8    
 [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
 [7] LC_PAPER=en_US.UTF-8       LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] Rcpp_1.0.1

Вопрос 1: Должен ли я правильно использовать Rcpp::stop()?То есть, следует ли ожидать, что я смогу вызвать его и получить сообщение об ошибке на консоли, как в случае с OS X?

Вопрос 2: Если да, есть ли обходной путь для явно неоптимального поведения, которое явижу на Linux / g ++?

Answer 1

Краткие ответы:

Вопрос 1

Вы используете Rcpp::stop() правильно.Но вашей системе уже несколько лет и несколько релизов R, и мы сделали несколько десятков (!!) релизов Rcpp, так как она была текущей.Такая комбинация старого R и компилятора с текущим Rcpp встречается редко.

Вопрос 2

Обновите до текущих версий или придерживайтесь древних, которые мы сделали, когда эти версии R и g ++ правят.Может быть, попробуйте Rcpp версии 0.12. * Или 0.13. *.

Пример

В текущих версиях ОС и компилятора:

> Rcpp::cppFunction('double doStop(NumericVector x) { stop("foo"); return x[1]; }')
> doStop(c(1.2, 3.4))
Error in doStop(c(1.2, 3.4)) : foo
> 
> sessionInfo()
R version 3.6.0 (2019-04-26)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Ubuntu 18.10

Matrix products: default
BLAS:   /usr/lib/x86_64-linux-gnu/openblas/libblas.so.3
LAPACK: /usr/lib/x86_64-linux-gnu/libopenblasp-r0.3.3.so

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C              
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8    
 [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
 [7] LC_PAPER=en_US.UTF-8       LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

loaded via a namespace (and not attached):
[1] compiler_3.6.0 tools_3.6.0    Rcpp_1.0.1    
>