pike.git/
src/
las.c
Branch:
Tag:
Non-build tags
All tags
No tags
2002-11-24
2002-11-24 21:47:05 by Henrik Grubbström (Grubba) <grubba@grubba.org>
b19aff4f181a8990e5137102f360853be2d10daf (
19
lines) (+
16
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
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;