pike.git / src / las.c

version» Context lines:

pike.git/src/las.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" - RCSID("$Id: las.c,v 1.298 2002/09/15 18:47:32 marcus Exp $"); + RCSID("$Id: las.c,v 1.299 2002/09/30 12:45:56 marcus 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:564:    {    node *tmp;    struct node_s_block *tmp2;    int e=0;      #ifndef PIKE_DEBUG    if(cumulative_parse_error)    {   #endif    -  for(tmp2=node_s_blocks;tmp2;tmp2=tmp2->next) e+=NODES; -  for(tmp=free_node_ss;tmp;tmp=_CAR(tmp)) e--; +  for(tmp2=node_s_blocks;tmp2;tmp2=tmp2->next) e+=tmp2->used;    if(e)    {    int e2=e;    for(tmp2=node_s_blocks;tmp2;tmp2=tmp2->next)    {    for(e=0;e<NODES;e++)    {    if (tmp2->x[e].token != USHRT_MAX)    {    tmp=tmp2->x+e;