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.557 2004/03/13 14:45:06 grubba Exp $ + || $Id: program.c,v 1.558 2004/03/13 19:50:23 grubba Exp $   */      #include "global.h" - RCSID("$Id: program.c,v 1.557 2004/03/13 14:45:06 grubba Exp $"); + RCSID("$Id: program.c,v 1.558 2004/03/13 19:50:23 grubba Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"   #include "pike_types.h"   #include "stralloc.h"   #include "las.h"   #include "language.h"   #include "lex.h"   #include "pike_macros.h"   #include "fsort.h"
pike.git/src/program.c:1457:    struct svalue *tmp=low_mapping_string_lookup(resolve_cache,ident);    if(tmp)    {    if(!(SAFE_IS_ZERO(tmp) && tmp->subtype==1))    return mkconstantsvaluenode(tmp);       return 0;    }    }    -  if(!Pike_compiler->num_parse_error && get_master()) +  if(get_master())    {    DECLARE_CYCLIC();    node *ret=0;    if(BEGIN_CYCLIC(ident, lex.current_file))    {    my_yyerror("Recursive module dependency in %s.",    ident->str);    }else{    SET_CYCLIC_RET(1);   
pike.git/src/program.c:1518:    }    else {    if (!ident->size_shift)    handle_compile_exception ("Error resolving '%s'.", ident->str);    else    handle_compile_exception ("Error resolving identifier.");    }    }    }    END_CYCLIC(); -  if(ret) return ret; +  +  return ret;    }       return 0;   }      /*! @decl constant this    *!    *! Builtin read only variable that evaluates to the current object.    *!    *! @seealso