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.663 2008/04/14 16:34:54 grubba Exp $ + || $Id: program.c,v 1.664 2008/04/15 02:07:22 nilsson 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:29:   #include "stuff.h"   #include "mapping.h"   #include "cyclic.h"   #include "pike_security.h"   #include "pike_types.h"   #include "opcodes.h"   #include "version.h"   #include "block_alloc.h"   #include "pikecode.h"   #include "pike_compiler.h" + #include "module_support.h"      #include <errno.h>   #include <fcntl.h>      #define sp Pike_sp      #undef ATTRIBUTE   #define ATTRIBUTE(X)      static void low_enter_compiler(struct object *ce, int inherit);
pike.git/src/program.c:8899:    {    int e;    e=--(Pike_compiler->compiler_frame->current_number_of_locals);    if ((Pike_compiler->compiler_pass == 2) &&    !(Pike_compiler->compiler_frame->variable[e].flags &    LOCAL_VAR_IS_USED)) {    push_int(REPORT_WARNING);    ref_push_string(Pike_compiler->compiler_frame->variable[e].file);    push_int(Pike_compiler->compiler_frame->variable[e].line);    push_constant_text("parse"); -  push_constant_text("Unused local variable %S."); +  push_constant_text("Unused local variable %s.");    ref_push_string(Pike_compiler->compiler_frame->variable[e].name);    safe_apply_current(CE_REPORT_FUN_NUM, 6);    pop_stack();    }    free_string(Pike_compiler->compiler_frame->variable[e].name);    free_type(Pike_compiler->compiler_frame->variable[e].type);    if(Pike_compiler->compiler_frame->variable[e].def)    free_node(Pike_compiler->compiler_frame->variable[e].def);       free_string(Pike_compiler->compiler_frame->variable[e].file);
pike.git/src/program.c:8931: Inside #if 1
   * actually is used from a nested scope. */    for(;level<Pike_compiler->compiler_frame->min_number_of_locals;level++)    {    if ((Pike_compiler->compiler_pass == 2) &&    !(Pike_compiler->compiler_frame->variable[level].flags &    LOCAL_VAR_IS_USED)) {    push_int(REPORT_WARNING); /* Warning */    ref_push_string(Pike_compiler->compiler_frame->variable[level].file);    push_int(Pike_compiler->compiler_frame->variable[level].line);    push_constant_text("parse"); -  push_constant_text("Unused local variable %S."); +  push_constant_text("Unused local variable %s.");    ref_push_string(Pike_compiler->compiler_frame->variable[level].name);    safe_apply_current(CE_REPORT_FUN_NUM, 6);    pop_stack();    /* Make sure we only warn once... */    Pike_compiler->compiler_frame->variable[level].flags |=    LOCAL_VAR_IS_USED;    }    free_string(Pike_compiler->compiler_frame->variable[level].name);    copy_shared_string(Pike_compiler->compiler_frame->variable[level].name,    empty_pike_string);