pike.git/
src/
docode.c
Branch:
Tag:
Non-build tags
All tags
No tags
2001-08-31
2001-08-31 06:54:06 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
741130e6843438ecaf20cc4405ed3a56101e2a9d (
11
lines) (+
4
/-
7
)
[
Show
|
Annotate
]
Branch:
7.9
use F_APPLY_LFUN more, also saves a cycle :)
Rev: src/docode.c:1.131
5:
\*/ /**/ #include "global.h"
-
RCSID("$Id: docode.c,v 1.
130
2001/08/
16
03
:
27
:
35
hubbe Exp $");
+
RCSID("$Id: docode.c,v 1.
131
2001/08/
31
06
:
54
:
06
hubbe Exp $");
#include "las.h" #include "program.h" #include "pike_types.h"
1206:
return 1; }
-
else if(CAR(n)->token == F_IDENTIFIER
&&
-
IDENTIFIER_IS_FUNCTION(ID_FROM_INT(Pike_compiler->new_program,
-
CAR(n
)
->u.id.number)->identifier_flags))
+
else if(CAR(n)->token == F_IDENTIFIER)
{ return do_lfun_call(CAR(n)->u.id.number,CDR(n)); } else if(CAR(n)->token == F_EXTERNAL &&
-
CAR(n)->u.integer.a == Pike_compiler->new_program->id
&&
-
IDENTIFIER_IS_FUNCTION(ID_FROM_INT(Pike_compiler->new_program,
-
CAR(n
)
->u.integer.b)->identifier_flags))
+
CAR(n)->u.integer.a == Pike_compiler->new_program->id)
{ return do_lfun_call(CAR(n)->u.integer.b,CDR(n)); }