pike.git/
src/
program.c
Branch:
Tag:
Non-build tags
All tags
No tags
1998-05-15
1998-05-15 19:01:38 by Henrik Grubbström (Grubba) <grubba@grubba.org>
0b9d1c77c84d610d6bbc4968593d2447508ca461 (
12
lines) (+
9
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
Added some paranoia.
Rev: src/program.c:1.91
4:
||| See the files COPYING and DISCLAIMER for more information. \*/ #include "global.h"
-
RCSID("$Id: program.c,v 1.
90
1998/05/15
18
:
43
:
45
grubba Exp $");
+
RCSID("$Id: program.c,v 1.
91
1998/05/15
19
:
01
:
38
grubba Exp $");
#include "program.h" #include "object.h" #include "dynamic_buffer.h"
1950:
int find_identifier(char *name,struct program *prog) { struct pike_string *n;
-
if(!prog)
+
if(!prog)
{
+
if (strlen(name) < 1024) {
error("Lookup of identifier %s in destructed object.\n", name);
-
+
} else {
+
error("Lookup of long identifier in destructed object.\n");
+
}
+
}
n=findstring(name); if(!n) return -1; return find_shared_string_identifier(n,prog);