pike.git/ src/ las.c

Branch: Tag:

2002-11-24

2002-11-24 21:47:05 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Improved valgrind performance.

Rev: src/las.c:1.313
Rev: src/program.c:1.461

2:   || 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: las.c,v 1.312 2002/11/23 17:03:00 mast Exp $ + || $Id: las.c,v 1.313 2002/11/24 21:46:47 grubba Exp $   */      #include "global.h" - RCSID("$Id: las.c,v 1.312 2002/11/23 17:03:00 mast Exp $"); + RCSID("$Id: las.c,v 1.313 2002/11/24 21:46:47 grubba Exp $");      #include "language.h"   #include "interpret.h"
5399:    }    }    -  Pike_compiler->new_program->num_program=jump; +    #ifdef PIKE_USE_MACHINE_CODE    Pike_compiler->new_program->num_relocations = num_relocations; -  +  + #ifdef VALGRIND_DISCARD_TRANSLATIONS +  /* We won't use this machine code any more... */ +  VALGRIND_DISCARD_TRANSLATIONS(jump, +  (p->num_program - jump)*sizeof(p->program[0])); + #endif /* VALGRIND_DISCARD_TRANSLATIONS */   #endif /* PIKE_USE_MACHINE_CODE */    -  +  Pike_compiler->new_program->num_program=jump; +     return ret;   }   
5600:    if(Pike_compiler->compiler_frame->lexical_scope & SCOPE_SCOPE_USED)    vargs|=IDENTIFIER_SCOPE_USED;    + #ifdef PIKE_DEBUG +  if(a_flag > 5) +  fprintf(stderr, "Extra identifier flags:0x%02x\n", vargs); + #endif +     if(Pike_compiler->compiler_pass==1)    {    tmp.offset=-1;