time_util_warning_n__()

int time_util_warning_n__	(	char *	caller,
		char *	text,
		timeint *	n,
		ftnlen	caller_len,
		ftnlen	text_len
	)

Definition at line 52 of file ctime_util_warning.c.

{
    integer i;
    fputs("WARNING (", stderr);
    for (i=0; i<caller_len; i++) { fputc((int)*(caller++), stderr); }
    fputs("): ",stderr);
    for (i=0; i<text_len; i++) { fputc((int)*(text++), stderr); }
    i=(int)*n;
    fprintf(stderr," %d\n",i);
    return 0;
} /* time_util_warning_n__ */