Displaying 2 results from an estimated 2 matches for "outtextdata".
2005 Sep 18
0
Updated rawConnection() patch
...t(con)), env)
+ }
+ con
}
seek <- function(con, ...)
--- ./src/main/connections.c.orig 2005-08-29 17:47:35.000000000 -0700
+++ ./src/main/connections.c 2005-09-18 11:54:49.752647400 -0700
@@ -59,7 +59,6 @@
#define NSINKS 21
static Rconnection Connections[NCONNECTIONS];
-static SEXP OutTextData;
static int R_SinkNumber;
static int SinkCons[NSINKS], SinkConsClose[NSINKS], R_SinkSplit[NSINKS];
@@ -76,16 +75,6 @@
return i;
}
-static int ConnIndex(Rconnection con)
-{
- int i;
- for(i = 0; i < NCONNECTIONS; i++)
- if(Connections[i] == con) break;
- if(i >= NCONNECTIO...
2005 Aug 22
2
RFC: "loop connections"
...;
}
-static void outtext_close(Rconnection con)
+static void outloop_close(Rconnection con)
{
- Routtextconn this = (Routtextconn)con->private;
+ Routloopconn this = (Routloopconn)con->private;
SEXP tmp;
int idx = ConnIndex(con);
@@ -1755,9 +1792,9 @@
SET_VECTOR_ELT(OutTextData, idx, R_NilValue);
}
-static void outtext_destroy(Rconnection con)
+static void outloop_destroy(Rconnection con)
{
- Routtextconn this = (Routtextconn)con->private;
+ Routloopconn this = (Routloopconn)con->private;
free(this->lastline); free(this);
}
@@ -1765,7 +1802,7 @@...