pike.git
/
src
/
program.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/program.c:1:
/* || This file is part of Pike. For copyright information see COPYRIGHT. || Pike is distributed under GPL, LGPL and MPL. See the file COPYING || for more information.
-
|| $Id: program.c,v 1.
704
2008/05/24 16:
20
:
00
grubba Exp $
+
|| $Id: program.c,v 1.
705
2008/05/24 16:
21
:
21
grubba Exp $
*/ #include "global.h" #include "program.h" #include "object.h" #include "dynamic_buffer.h" #include "pike_types.h" #include "stralloc.h" #include "las.h" #include "lex.h"
pike.git/src/program.c:6889:
*/ PMOD_EXPORT void va_yyreport(int severity_level, struct pike_string *file, INT32 line, struct pike_string *system, INT32 args, const char *fmt, va_list vargs) { struct compilation *c = MAYBE_THIS_COMPILATION; struct string_builder s; struct pike_string *msg;
-
if (!c)
return;
/* No compiler context. */
+
if (!c)
{
+
/* No compiler context. */
+
pop_n_elems(args);
+
return;
+
}
STACK_LEVEL_START(args); #ifdef PIKE_DEBUG if(Pike_interpreter.recoveries && Pike_sp-Pike_interpreter.evaluator_stack < Pike_interpreter.recoveries->stack_pointer) Pike_fatal("Stack error (underflow)\n"); #endif /* Convert type errors to warnings in non-strict compat mode. */ if ((system == type_check_system_string) &&