pike.git/ src/ program.c

2000-07-10

2000-07-10 18:21:33 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• de1d7d7adf40fe3b7a64a91998f820886f17e7a9 (17 lines) (+12/-5) ^{[ Show | Annotate ]}
  Branch: 7.9

last_identifier is now part of the program_state.
Changed a few INT32 to size_t.

Rev: src/compilation.h:1.18
Rev: src/language.yacc:1.200
Rev: src/program.c:1.248
Rev: src/program.h:1.94

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.247 2000/07/07 01:48:08 hubbe Exp $"); + RCSID("$Id: program.c,v 1.248 2000/07/10 18:21:32 grubba Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
1062:    while(Pike_compiler->compiler_frame)    pop_compiler_frame();    +  if(Pike_compiler->last_identifier) +  { +  free_string(Pike_compiler->last_identifier); +  Pike_compiler->last_identifier=0; +  } +     if(Pike_compiler->last_file)    {    free_string(Pike_compiler->last_file);
1378:    * Allocate needed for this program in the object structure.    * An offset to the data is returned.    */ - SIZE_T low_add_storage(SIZE_T size, SIZE_T alignment, int modulo_orig) + size_t low_add_storage(size_t size, size_t alignment, int modulo_orig)   {    long offset;    int modulo;
1946:   int low_define_variable(struct pike_string *name,    struct pike_string *type,    INT32 flags, -  INT32 offset, +  size_t offset,    INT32 run_time_type)   {    int n;
1991:   int map_variable(char *name,    char *type,    INT32 flags, -  INT32 offset, +  size_t offset,    INT32 run_time_type)   {    int ret;
2012:      int quick_map_variable(char *name,    int name_length, -  INT32 offset, +  size_t offset,    char *type,    int type_length,    INT32 run_time_type,