pike.git / src / lex.c

version» Context lines:

pike.git/src/lex.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: lex.c,v 1.33 1997/12/16 22:50:05 grubba Exp $"); + RCSID("$Id: lex.c,v 1.34 1997/12/20 19:36:48 grubba Exp $");   #include "language.h"   #include "array.h"   #include "lex.h"   #include "stralloc.h"   #include "dynamic_buffer.h"   #include "constants.h"   #include "hashtable.h"   #include "stuff.h"   #include "pike_memory.h"   #include "interpret.h"
pike.git/src/lex.c:1853:    struct svalue *sv;       SKIPWHITE();    if (!GOBBLE('(')) {    yyerror("Missing '(' in #if constant().\n");    return;    }    READBUF(isidchar(C));       push_text(buf); -  if (sv = low_mapping_string_lookup(get_builtin_constants(), -  sp[-1].u.string)) { +  if ((sv = low_mapping_string_lookup(get_builtin_constants(), +  sp[-1].u.string))) {    pop_stack();    push_svalue(sv);    res = 1;    } else if (get_master()) {    current_file->refs++;    push_string(current_file);       SAFE_APPLY_MASTER("resolv", 2);       if ((throw_value.type != T_STRING) &&