Fix compilation issues

mgirlich · mgirlich · commit 33d6c7e4340f · 2023-09-04T12:59:31.000Z
diff --git a/src/xml2_doc.cpp b/src/xml2_doc.cpp
@@ -262,7 +262,7 @@ cpp11::strings doc_url(cpp11::sexp doc_sxp) {
     return Rf_ScalarString(NA_STRING);
   }
 
-  return cpp11::strings({(const char*) doc->URL});
+  return cpp11::as_sexp((const char*) doc->URL);
 }
 
 [[cpp11::register]]

Original file line number	Diff line number	Diff line change
`@@ -262,7 +262,7 @@ cpp11::strings doc_url(cpp11::sexp doc_sxp) {`
`262`	`262`	`return Rf_ScalarString(NA_STRING);`
`263`	`263`	`}`
`264`	`264`
`265`		`- return cpp11::strings({(const char*) doc->URL});`
	`265`	`+ return cpp11::as_sexp((const char*) doc->URL);`
`266`	`266`	`}`
`267`	`267`
`268`	`268`	`[[cpp11::register]]`