pike.git / src / program.c

version» Context lines:

pike.git/src/program.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: program.c,v 1.736 2008/07/16 01:00:19 mast Exp $ + || $Id: program.c,v 1.737 2008/07/16 01:08:05 mast Exp $   */      #include "global.h"   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"   #include "pike_types.h"   #include "stralloc.h"   #include "las.h"   #include "lex.h"
pike.git/src/program.c:1462:   void unuse_modules(INT32 howmany)   {    struct compilation *c = THIS_COMPILATION;    if(!howmany) return;   #ifdef PIKE_DEBUG    if(howmany *sizeof(struct svalue) > c->used_modules.s.len)    Pike_fatal("Unusing too many modules.\n");   #endif    c->num_used_modules -= howmany;    Pike_compiler->num_used_modules-=howmany; -  low_make_buf_space(-sizeof(struct svalue)*howmany, &c->used_modules); +  low_make_buf_space((ptrdiff_t) sizeof(struct svalue) * -howmany, +  &c->used_modules);    free_svalues((struct svalue *)low_make_buf_space(0, &c->used_modules),    howmany,    BIT_MAPPING | BIT_OBJECT | BIT_PROGRAM);    if(Pike_compiler->module_index_cache)    {    free_mapping(Pike_compiler->module_index_cache);    Pike_compiler->module_index_cache=0;    }   }