pike.git / src / program.c

version» Context lines:

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.625 2007/10/13 15:34:59 grubba Exp $ + || $Id: program.c,v 1.626 2007/10/16 09:17:20 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:8440:    */    if (Pike_compiler->num_parse_error) return;       init_string_builder(&s, 0);    va_start(args,fmt);    string_builder_vsprintf(&s, fmt, args);    va_end(args);    msg = finish_string_builder(&s);       if (master_object) { +  if (lex.current_file) {    ref_push_string(lex.current_file); -  +  } else { +  push_constant_text("-"); +  }    push_int(lex.current_line);    push_string(msg);       low_safe_apply_handler("compile_warning",    error_handler, compat_handler, 3);    pop_stack();    } else {    if (!msg->size_shift) {    fprintf(stderr, "%s:%d: Warning: %s\n",    lex.current_file->str, lex.current_line, msg->str);