pike.git / src / las.c

version» Context lines:

pike.git/src/las.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: las.c,v 1.35 1997/08/03 09:55:09 hubbe Exp $"); + RCSID("$Id: las.c,v 1.36 1997/08/30 18:35:37 grubba Exp $");      #include "language.h"   #include "interpret.h"   #include "las.h"   #include "array.h"   #include "object.h"   #include "stralloc.h"   #include "dynamic_buffer.h"   #include "lex.h"   #include "pike_types.h"
pike.git/src/las.c:128:      struct node_chunk   {    struct node_chunk *next;    node nodes[NODES];   };      static struct node_chunk *node_chunks=0;   static node *free_nodes=0;    - void free_all_nodes() + void free_all_nodes(void)   {    if(!local_variables)    {    node *tmp;    struct node_chunk *tmp2;    int e=0;          if(cumulative_parse_error)    {
pike.git/src/las.c:215:    if(cdr_is_node(n)) free_node(CDR(n));    }    n->token=USHRT_MAX;    if(n->type) free_string(n->type);    CAR(n)=free_nodes;    free_nodes=n;   }         /* here starts routines to make nodes */ - static node *mkemptynode() + static node *mkemptynode(void)   {    node *res;    if(!free_nodes)    {    int e;    struct node_chunk *tmp=ALLOC_STRUCT(node_chunk);    tmp->next=node_chunks;    node_chunks=tmp;       for(e=0;e<NODES-1;e++)
pike.git/src/las.c:2097:    ret=define_function(name,    type,    modifiers,    IDENTIFIER_PIKE_FUNCTION | vargs,    &tmp);       free_node(n);    return ret;   }    - INT32 get_opt_info() { return last_function_opt_info; } + INT32 get_opt_info(void) { return last_function_opt_info; }