std::string_view support in Rcpp::wrap()

Author: evalon32

inst/include/Rcpp/internal/wrap.h

@@ -66,6 +66,12 @@ namespace Rcpp {
             return make_charsexp__impl__cstring(st.c_str());
         }
 
+#if __cplusplus >= 201703L
+        inline SEXP make_charsexp__impl__cstring(std::string_view st) {
+            return Rf_mkCharLen(st.data(), st.size());
+        }
+#endif
+
     	template <typename T>
     	inline SEXP make_charsexp__impl(const T& s, Rcpp::traits::true_type) {
             return make_charsexp__impl__wstring(s);

inst/include/Rcpp/traits/r_type_traits.h

@@ -141,6 +141,9 @@ template<> struct r_type_traits<Rcomplex>{ typedef r_type_primitive_tag r_catego
 template<> struct r_type_traits<bool>{ typedef r_type_primitive_tag r_category ; } ;
 template<> struct r_type_traits<std::string>{ typedef r_type_string_tag r_category ; } ;
 template<> struct r_type_traits<std::wstring>{ typedef r_type_string_tag r_category ; } ;
+#if __cplusplus >= 201703L
+template<> struct r_type_traits<std::string_view>{ typedef r_type_string_tag r_category ; } ;
+#endif
 template<> struct r_type_traits<char>{ typedef r_type_string_tag r_category ; } ;
 template<> struct r_type_traits<wchar_t>{ typedef r_type_string_tag r_category ; } ;
 

inst/include/Rcpp/traits/wrap_type_traits.h

@@ -82,6 +82,9 @@ template <> struct wrap_type_traits<unsigned int> { typedef wrap_type_primitive_
 template <> struct wrap_type_traits<bool> { typedef wrap_type_primitive_tag wrap_category; } ;
 template <> struct wrap_type_traits<std::string> { typedef wrap_type_primitive_tag wrap_category; } ;
 template <> struct wrap_type_traits<std::wstring> { typedef wrap_type_primitive_tag wrap_category; } ;
+#if __cplusplus >= 201703L
+template <> struct wrap_type_traits<std::string_view> { typedef wrap_type_primitive_tag wrap_category; } ;
+#endif
 template <> struct wrap_type_traits<Rcpp::String> { typedef wrap_type_primitive_tag wrap_category; } ;
 template <> struct wrap_type_traits<char> { typedef wrap_type_primitive_tag wrap_category; } ;
 template <> struct wrap_type_traits<wchar_t> { typedef wrap_type_primitive_tag wrap_category; } ;

inst/include/RcppCommon.h

@@ -54,6 +54,9 @@ namespace Rcpp {
 #include <iomanip>
 #include <sstream>
 #include <string>
+#if __cplusplus >= 201703L
+#include <string_view>
+#endif
 #include <list>
 #include <map>
 #include <set>