The R Project SVN R

(root)/trunk/src/main/sysutils.c @ 77458 – Rev 77059 → 77083



	error(_("allocation failed in R_tmpnam2"));
    strcpy(res, tm);
    return res;
}
 
void R_free_tmpnam(char *name)
{
    if (name) free(name);
}
 
SEXP attribute_hidden do_proctime(SEXP call, SEXP op, SEXP args, SEXP env)

Rev 77059	Rev 77083
Line 1908...	Line 1908...
1908	`error(_("allocation failed in R_tmpnam2"));`	1908	`error(_("allocation failed in R_tmpnam2"));`
1909	`strcpy(res, tm);`	1909	`strcpy(res, tm);`
1910	`return res;`	1910	`return res;`
1911	`}`	1911	`}`
1912		1912
1913	`void R_free_tmpnam(const char *name)`	1913	`void R_free_tmpnam(char *name)`
1914	`{`	1914	`{`
1915	`if (name) free(name);`	1915	`if (name) free(name);`
1916	`}`	1916	`}`
1917		1917
1918	`SEXP attribute_hidden do_proctime(SEXP call, SEXP op, SEXP args, SEXP env)`	1918	`SEXP attribute_hidden do_proctime(SEXP call, SEXP op, SEXP args, SEXP env)`