Minor changes

Author: mgirlich

src/connection.h

@@ -9,12 +9,12 @@
 #include <algorithm>
 #include <cstring>
 
-SEXP read_bin(SEXP con, size_t bytes = 64 * 1024);
+cpp11::sexp read_bin(cpp11::sexp con, size_t bytes = 64 * 1024);
 cpp11::sexp write_bin(cpp11::sexp data, cpp11::sexp con);
 
-inline size_t R_WriteConnection(SEXP con, void* buf, size_t n) {
+inline size_t R_WriteConnection(cpp11::sexp con, void* buf, size_t n) {
   cpp11::writable::raws payload(n);
-  SEXP payload_sexp = SEXP(payload);
+  cpp11::sexp payload_sexp = cpp11::sexp(payload);
 
   memcpy(RAW(payload_sexp), buf, n);
 

src/xml2_doc.cpp

@@ -211,8 +211,8 @@ cpp11::sexp doc_parse_raw(
     cpp11::strings base_url_sxp,
     cpp11::logicals as_html_sxp,
     cpp11::integers options_sxp) {
-  std::string encoding = cpp11::as_cpp<const char*>(encoding_sxp);
-  std::string base_url = cpp11::as_cpp<const char*>(base_url_sxp);
+  std::string encoding = cpp11::r_string(encoding_sxp[0]);
+  std::string base_url = cpp11::r_string(base_url_sxp[0]);
   bool as_html = cpp11::as_cpp<bool>(as_html_sxp);
   int options = cpp11::as_cpp<int>(options_sxp);