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

1999-12-30

1999-12-30 20:42:03 by Martin Stjernholm <mast@lysator.liu.se>

• 6c4a1aae8570b00f324f7b7d4a871c59690b4471 (12 lines) (+8/-4) ^{[ Show | Annotate ]}
  Branch: 7.9

Allocated fixed program number for Parser.HTML.

Rev: src/modules/Parser/html.c:1.56
Rev: src/modules/Parser/initstuff.h:1.2
Rev: src/modules/Parser/parser.c:1.5
Rev: src/program_id.h:1.3

1:   #include "global.h"   #include "stralloc.h"   #include "global.h" - RCSID("$Id: parser.c,v 1.4 1999/06/19 20:25:22 hubbe Exp $"); + RCSID("$Id: parser.c,v 1.5 1999/12/30 20:42:03 mast Exp $");   #include "pike_macros.h"   #include "interpret.h"   #include "program.h" -  + #include "program_id.h"   #include "object.h"   #include "operators.h"   
14:      /*#define DEBUG*/    - #define PARSER_CLASS(name,init,exit,prog) \ + #define PARSER_CLASS(name,init,exit,prog,id) \    void init(void); void exit(void); struct program *prog;   #define PARSER_SUBMODULE(name,init,exit) \    void init(void); void exit(void);
30:    void (*init)(void);    void (*exit)(void);    struct program **dest; +  int id;   } initclass[]=   {   #undef PARSER_CLASS
38:   #undef PARSER_SUBMODMAG   #define PARSER_SUBMODMAG(a,b,c)   #define PARSER_FUNCTION(a,b,c,d) - #define PARSER_CLASS(name,init,exit,prog) { name,init,exit,&prog }, + #define PARSER_CLASS(name,init,exit,prog,id) { name,init,exit,&prog,id },   #define PARSER_SUBMODULE(a,b,c)   #include "initstuff.h"   };
52:   {   #undef PARSER_CLASS   #undef PARSER_SUBMODULE - #define PARSER_CLASS(name,init,exit,prog) + #define PARSER_CLASS(name,init,exit,prog,id)   #define PARSER_SUBMODULE(name,init,exit) { name,init,exit },   #include "initstuff.h"    {0,0,0 }
158:    for (i=0; i<(int)NELEM(initclass); i++)    {    start_new_program(); +  if (initclass[i].id) new_program->id = initclass[i].id;      #ifdef DEBUG    fprintf(stderr,"Parser: initiating class \"Parser.%s\"...\n",