2003-08-21
2003-08-21 22:09:30 by Martin Stjernholm <mast@lysator.liu.se>
-
c4a08a0051a9ca28a7c957e764dcc7e5ce18327b
(118 lines)
(+56/-62)
[
Show
| Annotate
]
Branch: 7.9
Fixed a silly syntax error. Removed an apparently forgotten debug
printout and a now unnecessary block level.
Rev: src/program.c:1.521
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: program.c,v 1.520 2003/08/21 15:56:36 grubba Exp $
+ || $Id: program.c,v 1.521 2003/08/21 22:09:30 mast Exp $
*/
#include "global.h"
- RCSID("$Id: program.c,v 1.520 2003/08/21 15:56:36 grubba Exp $");
+ RCSID("$Id: program.c,v 1.521 2003/08/21 22:09:30 mast Exp $");
#include "program.h"
#include "object.h"
#include "dynamic_buffer.h"
1017: Inside #if defined(PIKE_DEBUG)
dump_program_tables (Pike_compiler->new_program, 0);
Pike_fatal ("Adding identifier twice, old at %d.\n", i);
}
- if (Pike_compiler->new_program->id == 65600) {
- fprintf(stderr, "Adding \"%s\"\n",
- id.name?id.name->str:"NULL");
+
}
- }
+
add_to_identifiers (id);
}
#else
4052:
n = isidentifier(name);
- do {
+
if(
#if 1
c &&
4071:
id->func.offset != -1) {
c=& p->constants[id->func.offset].sval;
}
- else if (IDENTIFIER_IS_FUNCTION(id->identifier_flags) {
+ else if (IDENTIFIER_IS_FUNCTION(id->identifier_flags)) {
if (!idref->inherit_offset) {
/* Alias for a function defined in this program. */
/* FIXME: Does this work for forward references? */
4115:
!svalues_are_constant(c,1,BIT_MIXED,0))
yyerror("Constant values may not have references to this.");
- }while(0);
-
+
if(Pike_compiler->new_program->flags & PROGRAM_PASS_1_DONE)
{
if(n==-1