The R Project SVN R

Rev

Rev 36948 | Rev 37903 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 36948 Rev 36990
Line 25... Line 25...
25
 
25
 
26
#include <Defn.h>
26
#include <Defn.h>
27
 
27
 
28
#define MAXLINE MAXELTSIZE
28
#define MAXLINE MAXELTSIZE
29
 
29
 
30
SEXP do_sprintf(SEXP call, SEXP op, SEXP args, SEXP env)
30
SEXP attribute_hidden do_sprintf(SEXP call, SEXP op, SEXP args, SEXP env)
31
{
31
{
32
    int i, nargs, cnt, v, thislen;
32
    int i, nargs, cnt, v, thislen;
33
    char *formatString, *starc;
33
    char *formatString, *starc;
34
    char fmt[MAXLINE+1], fmt2[MAXLINE+1], *fmtp, bit[MAXLINE+1], 
34
    char fmt[MAXLINE+1], fmt2[MAXLINE+1], *fmtp, bit[MAXLINE+1], 
35
	outputString[MAXLINE+1];
35
	outputString[MAXLINE+1];