diff options
| author | Steffen Mueller <smueller@cpan.org> | 2013-02-28 18:23:32 +0100 |
|---|---|---|
| committer | Steffen Mueller <smueller@cpan.org> | 2013-03-06 18:48:58 +0100 |
| commit | ddf23d4a1ae98daa8608179f83aad311d03898ef (patch) | |
| tree | d179e7c93aae15671f6265dbba2d083c031223a8 /intrpvar.h | |
| parent | f615be485d8c90f01432a39e678e01c615e2c15e (diff) | |
| download | perl-ddf23d4a1ae98daa8608179f83aad311d03898ef.tar.gz | |
Prepare PL_sv_objcount removal
This used to keep track of all objects. At least by now, that is
for no particularly good reason. Just because it could avoid a
bit of work during global destruction if no objects remained.
Let's do less work at run-time instead.
The interpreter global will remain for one deprecation cycle.
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/intrpvar.h b/intrpvar.h index 92d8e9275a..6865ab97cc 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -383,7 +383,9 @@ PERLVAR(I, forkprocess, int) /* so do_open |- can return proc# */ /* memory management */ PERLVAR(I, sv_count, IV) /* how many SV* are currently allocated */ -PERLVAR(I, sv_objcount, IV) /* how many objects are currently allocated */ +PERLVAR(I, sv_objcount, IV) /* DEPRECATED AND UNMAINTAINED. + * Will be removed in Perl 5.20. + * Used to be: how many objects are currently allocated. */ PERLVAR(I, sv_root, SV *) /* storage for SVs belonging to interp */ PERLVAR(I, sv_arenaroot, SV *) /* list of areas for garbage collection */ |