diff options
author | Nicholas Clark <nick@ccl4.org> | 2008-11-26 19:58:49 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2008-11-26 19:58:49 +0000 |
commit | 0da8eb3af06fe58c4c8c297ae7e9457946d4f195 (patch) | |
tree | bae3328a4ca4182301dbc59369d30f16ac8d2009 /embed.fnc | |
parent | b7783a124ffeaab87679eba041dd9997f4d5372a (diff) | |
download | perl-0da8eb3af06fe58c4c8c297ae7e9457946d4f195.tar.gz |
ingroup() is only used in doio.c.
Wrap gen_constant_list in #if defined(PERL_IN_OP_C)
p4raw-id: //depot/perl@34925
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -280,7 +280,9 @@ s |OP* |fold_constants |NN OP *o Afpd |char* |form |NN const char* pat|... Ap |char* |vform |NN const char* pat|NULLOK va_list* args Ap |void |free_tmps +#if defined(PERL_IN_OP_C) s |OP* |gen_constant_list|NULLOK OP* o +#endif #if !defined(HAS_GETENV_LEN) p |char* |getenv_len |NN const char *env_elem|NN unsigned long *len #endif @@ -370,7 +372,9 @@ ApP |I32 |ibcmp_locale |NN const char* a|NN const char* b|I32 len Apd |I32 |ibcmp_utf8 |NN const char *s1|NULLOK char **pe1|UV l1 \ |bool u1|NN const char *s2|NULLOK char **pe2 \ |UV l2|bool u2 -pR |bool |ingroup |Gid_t testgid|bool effective +#if defined(PERL_IN_DOIO_C) +sR |bool |ingroup |Gid_t testgid|bool effective +#endif p |void |init_argv_symbols|int argc|NN char **argv p |void |init_debugger Ap |void |init_stacks |