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. - || $Id: parser.c,v 1.20 2004/10/07 22:49:58 nilsson Exp $ + || $Id: parser.c,v 1.21 2010/05/11 16:10:48 grubba Exp $   */      #include "global.h"   #include "stralloc.h"   #include "global.h"   #include "pike_macros.h"   #include "interpret.h"   #include "program.h"   #include "program_id.h"   #include "object.h"
pike.git/src/modules/Parser/parser.c:93:    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); \    } \    } while(0)   #else   #define PARSER_CHECK_STACK(X)   #endif /* PIKE_DEBUG */    + /*! @module Parser +  */    -  + /*! @module _parser +  *! +  *! Low-level helpers for parsers. +  *! +  *! @note +  *! You probably don't want to use the modules contained in +  *! this module directly, but instead use the other @[Parser] +  *! modules. See instead the modules below. +  *! +  *! @seealso +  *! @[Parser], @[Parser.C], @[Parser.Pike], @[Parser.RCS], +  *! @[Parser.HTML], @[Parser.XML] +  */ +    static void parser_magic_index(INT32 args)   {    int i;       if (args!=1)    Pike_error("Parser.`[]: Too few or too many arguments\n");    if (sp[-1].type!=T_STRING)    Pike_error("Parser.`[]: Illegal type of argument\n");       for (i=0; i<(int)NELEM(submagic)-1; i++)
pike.git/src/modules/Parser/parser.c:162:    {    pop_stack();    }else{    f_index(2);    }    }    stack_swap();    pop_stack();   }    + /*! @endmodule +  */ +  + /*! @endmodule +  */ +    PIKE_MODULE_INIT   {   #ifdef PIKE_DEBUG    struct svalue *save_sp = sp;   #endif       int i;    for (i=0; i<(int)NELEM(initclass); i++)    {    start_new_program();