diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2005-12-29 12:00:29 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2005-12-29 12:00:29 +0000 |
| commit | f16dd614412ea67a8eb64bb09a88fccdbd9db6b6 (patch) | |
| tree | a5b7bf6146f445a04a570b1e0302ff7d2c1f5fbb /intrpvar.h | |
| parent | 85ce96a160e902929b94338ada20cf46b265d595 (diff) | |
| download | perl-f16dd614412ea67a8eb64bb09a88fccdbd9db6b6.tar.gz | |
re-implement MY_CXT API more efficiently, and add explicit
interpeter arg variant
p4raw-id: //depot/perl@26523
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/intrpvar.h b/intrpvar.h index 04ea137362..931ac461fb 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -517,6 +517,12 @@ PERLVARI(Isuidscript, int, -1) /* fd for suid script */ /* File descriptor to talk to the child which dumps scalars. */ PERLVARI(Idumper_fd, int, -1) #endif + +#ifdef PERL_IMPLICIT_CONTEXT +PERLVARI(Imy_cxt_size, int, -1) /* size of PL_my_cxt_list */ +PERLVARI(Imy_cxt_list, void **, NULL) /* per-module array of MY_CXT pointers */ +#endif + /* New variables must be added to the very end, before this comment, * for binary compatibility (the offsets of the old members must not change). * (Don't forget to add your variable also to perl_clone()!) |