[[Rcpp::export( signature = {x = list("{A}", "B"), verbose = getOption("verbose")} )]]
| 15 | |
| 16 | // [[Rcpp::export( signature = {x = list("{A}", "B"), verbose = getOption("verbose")} )]] |
| 17 | List test_signature(List x, bool verbose) { |
| 18 | if(x.size() > 0) { |
| 19 | CharacterVector first_element = x[0]; |
| 20 | return List::create(first_element, verbose); |
| 21 | } else { |
| 22 | return List::create(verbose); |
| 23 | } |
| 24 | } |
| 25 | |
| 26 | // [[Rcpp::export( rng = false, signature = {x = list("{A}", "B"), verbose = getOption("verbose")}, invisible = true )]] |
| 27 | List test_rng_false_signature_invisible_true(List x, bool verbose) { |