diff options
author | Gerard Goossen <gerard@ggoossen.net> | 2009-11-12 14:31:43 +0100 |
---|---|---|
committer | Rafael Garcia-Suarez <rgs@consttype.org> | 2009-11-12 16:25:36 +0100 |
commit | d343c3ef4538135207ab69cd65d1bb1ef5403ccc (patch) | |
tree | 1993aef1b199c1df713033677bb02fdac2e8dfd5 /intrpvar.h | |
parent | af24cc9d0ee84635a0e9165232ec7b091c4596f3 (diff) | |
download | perl-d343c3ef4538135207ab69cd65d1bb1ef5403ccc.tar.gz |
Add ENTER_with_name and LEAVE_with_name to automaticly check for matching ENTER/LEAVE when debugging is enabled
Diffstat (limited to 'intrpvar.h')
-rw-r--r-- | intrpvar.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/intrpvar.h b/intrpvar.h index 10cd6b7d34..20df3050f3 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -43,6 +43,9 @@ PERLVAR(Istack_base, SV **) PERLVAR(Istack_max, SV **) PERLVAR(Iscopestack, I32 *) /* scopes we've ENTERed */ +#ifdef DEBUGGING +PERLVAR(Iscopestack_name, const char * *) /* name of the scopes we've ENTERed */ +#endif PERLVAR(Iscopestack_ix, I32) PERLVAR(Iscopestack_max,I32) |