We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
R_ReadConnection()
1 parent 992cd01 commit 44eddbeCopy full SHA for 44eddbe
src/connection.h
@@ -14,18 +14,6 @@ SEXP write_bin(SEXP data, SEXP con);
14
15
inline SEXP R_GetConnection(SEXP con) { return con; }
16
17
-inline size_t R_ReadConnection(SEXP con, void* buf, size_t n) {
18
- SEXP res = PROTECT(read_bin(con, n));
19
-
20
- R_xlen_t size = Rf_xlength(res);
21
22
- memcpy(buf, RAW(res), size);
23
24
- UNPROTECT(1);
25
26
- return Rf_xlength(res);
27
-}
28
29
inline size_t R_WriteConnection(SEXP con, void* buf, size_t n) {
30
SEXP payload = PROTECT(Rf_allocVector(RAWSXP, n));
31
0 commit comments