Displaying 1 result from an estimated 1 matches for "stringeltgetter".
2010 Sep 08
0
Correction to vec-subset speed patch
...Subscript(s, ns, nx, call);
else {
ECALL(call, _("only 0's may be mixed with negative subscripts"));
}
}
- else return positiveSubscript(s, ns, nx);
- return R_NilValue;
+ else /* min == 0 */
+ return nonnegativeSubscript(s, ns, nx);
}
typedef SEXP (*StringEltGetter)(SEXP x, int i);
@@ -482,13 +500,14 @@
static SEXP
stringSubscript(SEXP s, int ns, int nx, SEXP names,
- StringEltGetter strg, int *stretch, Rboolean in, SEXP call)
+ StringEltGetter strg, int *stretch, SEXP call)
{
SEXP indx, indexnames;
int i, j, nnames, sub, extra;
int cans...