The R Project SVN R

(root)/trunk/src/main/split.c @ 28362 – Rev 36820 → 36990



#include <config.h>
#endif
 
#include "Defn.h"
 
SEXP attribute_hidden do_split(SEXP call, SEXP op, SEXP args, SEXP env)
{
    SEXP x, f, counts, vec, nm, nmj;
    int i, j, k, nobs, nlevs, nfac;
    Rboolean have_names;
 

Rev 36820	Rev 36990
Line 21...	Line 21...
21	`#include <config.h>`	21	`#include <config.h>`
22	`#endif`	22	`#endif`
23		23
24	`#include "Defn.h"`	24	`#include "Defn.h"`
25		25
26	`SEXP do_split(SEXP call, SEXP op, SEXP args, SEXP env)`	26	`SEXP attribute_hidden do_split(SEXP call, SEXP op, SEXP args, SEXP env)`
27	`{`	27	`{`
28	`SEXP x, f, counts, vec, nm, nmj;`	28	`SEXP x, f, counts, vec, nm, nmj;`
29	`int i, j, k, nobs, nlevs, nfac;`	29	`int i, j, k, nobs, nlevs, nfac;`
30	`Rboolean have_names;`	30	`Rboolean have_names;`
31		31