| 55 | return make_charsexp__impl__wstring(st.data()); |
| 56 | } |
| 57 | inline SEXP make_charsexp__impl__cstring(const char* data) { |
| 58 | return Rf_mkChar(data); |
| 59 | } |
| 60 | inline SEXP make_charsexp__impl__cstring(char data) { |
| 61 | char x[2]; x[0] = data; x[1] = '\0'; |
| 62 | return Rf_mkChar(x); |
no test coverage detected