Project/Real_code/gnu/gawk-3.1.3/eval.c
void
dump_fcall_stack(FILE *fp)
{
	int i;

	if (curfcall < 0)
		return;

	fprintf(fp, _("\n\t# Function Call Stack:\n\n"));
	for (i = curfcall; i >= 0; i--)
		fprintf(fp, "\t# %3d. %s\n", i+1, fcall_list[i].fname);
	fprintf(fp, _("\t# -- main --\n"));
}
/* dump_fcall_stack --- print a backtrace of the awk function calls */
print a backtrace of the awk function calls
print a backtrace of the awk function calls
void
dump_fcall_stack(FILE *fp)
{
	int i;
	if (curfcall < 0)
		return;
	fprintf(fp, _("\n\t# Function Call Stack:\n\n"));
	for (i = curfcall; i >= 0; i--)
		fprintf(fp, "\t# %3d. %s\n", i+1, fcall_list[i].fname);
	fprintf(fp, _("\t# -- main --\n"));
}
void dump_fcall_stack ( FILE * fp ) { int i ; if ( curfcall < 0 ) return ; fprintf ( fp , _ ( " \n \t \n \n " ) ) ; for ( i = curfcall ; i >= 0 ; i -- ) fprintf ( fp , " \t \n " , i + 1 , fcall_list [ i ] . fname ) ; fprintf ( fp , _ ( " \t \n " ) ) ; }
dump_fcall_stack --- print a backtrace of the awk function calls
dump_fcall_stack --- print a backtrace of the awk function calls