pike.git / src / modules / Parser / parser.c

version» Context lines:

pike.git/src/modules/Parser/parser.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.   */    - #include "global.h" - #include "stralloc.h" - #include "global.h" + #include "module.h"   #include "pike_macros.h"   #include "interpret.h"   #include "program.h"   #include "program_id.h" - #include "object.h" +    #include "operators.h" - #include "module.h" +       #include "parser.h"         #define sp Pike_sp   #define fp Pike_fp      #define PARSER_INITER      /*#define DEBUG*/
pike.git/src/modules/Parser/parser.c:84:   #define PARSER_SUBMODULE(a,b,c)   #define PARSER_SUBMODMAG(name,init,exit) { name,init,exit,NULL,NULL },   #include "initstuff.h"    { 0,0,0,0,0 }   };      #ifdef PIKE_DEBUG   #define PARSER_CHECK_STACK(X) do { \    if (save_sp != sp) { \    Pike_fatal("%s:%d: %ld droppings on stack! previous init: %s\n", \ -  __FILE__, __LINE__, \ -  PTRDIFF_T_TO_LONG(sp - save_sp), X); \ +  __FILE__, __LINE__, (long)(sp - save_sp), X); \    } \    } while(0)   #else   #define PARSER_CHECK_STACK(X)   #endif /* PIKE_DEBUG */      /*! @module Parser    */      /*! @module _parser
pike.git/src/modules/Parser/parser.c:154:       stack_dup();    ref_push_object(fp->current_object);    stack_swap();    f_arrow(2);       if (TYPEOF(sp[-1]) == T_INT)    {    pop_stack();    stack_dup(); -  push_constant_text("_Parser_"); +  push_static_text("_Parser_");    stack_swap();    f_add(2);    SAFE_APPLY_MASTER("resolv",1);    }    if (TYPEOF(sp[-1]) == T_INT)    {    pop_stack();    stack_dup(); -  push_constant_text("_Parser"); +  push_static_text("_Parser");    SAFE_APPLY_MASTER("resolv",1);    stack_swap();    if(TYPEOF(sp[-2]) == T_INT)    {    pop_stack();    }else{    f_index(2);    }    }    stack_swap();