pike.git/ src/ program.c

2003-09-30

2003-09-30 13:18:15 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 3b6901f6a10d57492e7d6c1533207959d1df95a0 (65 lines) (+36/-29) ^{[ Show | Annotate ]}
  Branch: 7.9

Fixed bug in define_function().

Rev: src/program.c:1.527

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.526 2003/09/29 19:35:48 mast Exp $ + || $Id: program.c,v 1.527 2003/09/30 13:18:15 grubba Exp $   */      #include "global.h" - RCSID("$Id: program.c,v 1.526 2003/09/29 19:35:48 mast Exp $"); + RCSID("$Id: program.c,v 1.527 2003/09/30 13:18:15 grubba Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
4563:   #endif    return overridden;    } -  } +  /* NOTE: At this point we already have the identifier in the +  * new program, and just need to add the reference. +  */ +  } else {   make_a_new_def:      #ifdef PIKE_DEBUG
4571:    Pike_fatal("Internal error: Not allowed to add more identifiers during second compiler pass.\n");   #endif    -  /* define a new function */ +  /* Define a new function */       copy_shared_string(fun.name, name);    copy_pike_type(fun.type, type);
4604:    ref.id_flags = flags;    ref.identifier_offset = i;    ref.inherit_offset = 0; +  }    -  +  /* Add the reference. */ +     i=Pike_compiler->new_program->num_identifier_references;    add_to_identifier_references(ref);