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.
644
2008/01/28
15
:
18
:
09
grubba
Exp $
+
|| $Id: program.c,v 1.
645
2008/01/28
19
:
46
:
13
mast
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:1598:
s.subtype = NUMBER_UNDEFINED; s.u.integer = 0; return mkconstantsvaluenode(&s); } if(resolve_cache) { struct svalue *tmp=low_mapping_string_lookup(resolve_cache,ident); if(tmp) {
-
if
(!
SAFE_
IS_
ZERO
(tmp))
+
if(!IS_
UNDEFINED
(tmp))
return mkconstantsvaluenode(tmp); return 0; } } if(get_master()) { DECLARE_CYCLIC(); node *ret=0;
pike.git/src/program.c:1638:
Pike_sp[-1].u.program == placeholder_program))) { my_yyerror("Got placeholder %s (resolver problem) " "when resolving %S.", get_name_of_type (Pike_sp[-1].type), ident->str); } else { if(!resolve_cache) resolve_cache=dmalloc_touch(struct mapping *, allocate_mapping(10)); mapping_string_insert(resolve_cache,ident,Pike_sp-1);
-
if(!
(SAFE_
IS_
ZERO
(Pike_sp-1)
&& Pike_sp[-1].subtype==1
)
)
+
if(!IS_
UNDEFINED
(Pike_sp-1))
{ ret=mkconstantsvaluenode(Pike_sp-1); } } pop_stack(); } else { if(Pike_compiler->compiler_pass==2) { if (throw_value.type == T_STRING) { my_yyerror("%S", throw_value.u.string);