diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-05-07 16:08:16 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-05-07 16:08:16 +0000 |
commit | 892b45be8fb48b672b1d646c00fb1b9bac292d07 (patch) | |
tree | d3302cc367ce86acaa5502ddbcf2626bd096fe85 /intrpvar.h | |
parent | a034e688aeb372632feafc428b392a22393dec55 (diff) | |
download | perl-892b45be8fb48b672b1d646c00fb1b9bac292d07.tar.gz |
The ptr_table arena variables and code is only needed for ithreads.
p4raw-id: //depot/perl@24413
Diffstat (limited to 'intrpvar.h')
-rw-r--r-- | intrpvar.h | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/intrpvar.h b/intrpvar.h index 9688541a14..bca17b0c7c 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -261,7 +261,9 @@ PERLVAR(Ixpvmg_root, XPVMG *) /* free xpvmg list */ PERLVAR(Ixpvlv_root, XPVLV *) /* free xpvlv list */ PERLVAR(Ixpvbm_root, XPVBM *) /* free xpvbm list */ PERLVAR(Ihe_root, HE *) /* free he list */ +#if defined(USE_ITHREADS) PERLVAR(Ipte_root, struct ptr_tbl_ent *) /* free ptr_tbl_ent list */ +#endif PERLVAR(Inice_chunk, char *) /* a nice chunk of memory to reuse */ PERLVAR(Inice_chunk_size, U32) /* how nice the chunk of memory is */ @@ -438,8 +440,9 @@ PERLVAR(Ixpvmg_arenaroot,XPVMG*) /* list of allocated xpvmg areas */ PERLVAR(Ixpvlv_arenaroot,XPVLV*) /* list of allocated xpvlv areas */ PERLVAR(Ixpvbm_arenaroot,XPVBM*) /* list of allocated xpvbm areas */ PERLVAR(Ihe_arenaroot, HE *) /* list of allocated he areas */ +#if defined(USE_ITHREADS) PERLVAR(Ipte_arenaroot, struct ptr_tbl_ent *) /* list of allocated he areas */ - +#endif /* 5.6.0 stopped here */ PERLVAR(Ipsig_pend, int *) /* per-signal "count" of pending */ |