pike.git/
src/
program.c
Branch:
Tag:
Non-build tags
All tags
No tags
2000-02-15
2000-02-15 23:39:33 by Henrik Grubbström (Grubba) <grubba@grubba.org>
abac4e2fde37363567a0ae9c7167b47bfb1fa2d1 (
19
lines) (+
18
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
Added low_find_lfun().
Rev: src/program.c:1.205
5:
\*/ /**/ #include "global.h"
-
RCSID("$Id: program.c,v 1.
204
2000/02/15
22
:
06
:
21
hubbe
Exp $");
+
RCSID("$Id: program.c,v 1.
205
2000/02/15
23
:
39
:
33
grubba
Exp $");
#include "program.h" #include "object.h" #include "dynamic_buffer.h"
2528:
return -1; }
+
int low_find_lfun(struct program *p, int lfun)
+
{
+
struct pike_string *tmp = find_string(lfun_names[lfun]);
+
unsigned int flags = 0;
+
if (!tmp) return -1;
+
if ((1 <= lfun) && (lfun < 3)) {
+
/* create() and destroy() are used even if they are static. */
+
flags = SEE_STATIC;
+
}
+
return
+
really_low_find_shared_string_identifier(lfun_name,
+
dmalloc_touch(struct program *,
+
p),
+
flags);
+
}
+
/* * lookup the number of a function in a program given the name in * a shared_string