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.714 2008/05/31 16:21:30 grubba Exp $ + || $Id: program.c,v 1.715 2008/05/31 18:06:25 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:10554:    continue; /* It's ok... */    }       /* Note: Uses weaker check for constant integers. */    if(((bid->run_time_type != PIKE_T_INT) ||    (ID_FROM_INT(a, i)->run_time_type != PIKE_T_INT)) &&    !match_types(ID_FROM_INT(a,i)->type, bid->type)) {    INT32 aid_line = a_line;    INT32 bid_line = b_line;    struct pike_string *aid_file = get_identifier_line(a, i, &aid_line); -  struct pike_string *bid_file = get_identifier_line(b, i, &bid_line); +  struct pike_string *bid_file = get_identifier_line(b, e, &bid_line);    if (!aid_file) aid_file = a_file;    if (!bid_file) bid_file = b_file;    ref_push_string(bid->name);    ref_push_program(a);    ref_push_program(b);    yytype_report(severity_level,    aid_file, aid_line, ID_FROM_INT(a, i)->type,    bid_file, bid_line, bid->type, 3,    "Identifier %s in %O is incompatible with the same in %O.");    }
pike.git/src/program.c:10620:    bid_file, bid_line, bid->type,    a_file, a_line, NULL,    0, "Missing identifier %S.", bid->name);    continue;    }       if (!pike_types_le(bid->type, ID_FROM_INT(a, i)->type)) {    INT32 aid_line = a_line;    INT32 bid_line = b_line;    struct pike_string *aid_file = get_identifier_line(a, i, &aid_line); -  struct pike_string *bid_file = get_identifier_line(b, i, &bid_line); +  struct pike_string *bid_file = get_identifier_line(b, e, &bid_line);    if (!aid_file) aid_file = a_file;    if (!bid_file) bid_file = b_file;    if(!match_types(ID_FROM_INT(a,i)->type, bid->type)) {    yytype_report(severity_level,    bid_file, bid_line, bid->type,    aid_file, aid_line, ID_FROM_INT(a, i)->type,    0, "Type of identifier %S does not match.", bid->name);    } else {    yytype_report(REPORT_WARNING,    bid_file, bid_line, bid->type,