pike.git/
src/
program.c
Branch:
Tag:
Non-build tags
All tags
No tags
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);