Revision: 848
Author: dubiously
Date: Mon Jul 27 21:41:58 2009
Log: This C, not C++. Declaration must happen before any executable code
inside the lexical scope!
http://code.google.com/p/perl-devel-nytprof/source/detail?r=848
Modified:
/trunk/NYTProf.xs
=======================================
--- /trunk/NYTProf.xs Mon Jul 20 21:31:58 2009
+++ /trunk/NYTProf.xs Mon Jul 27 21:41:58 2009
@@ -2143,6 +2143,7 @@
SV *incl_time_sv, *excl_time_sv;
NV incl_subr_sec, excl_subr_sec;
SV *sv_tmp;
+ AV *subr_call_av;
if (subr_entry->called_subnam_sv == &PL_sv_undef) {
logwarn("xsub/builtin exited via an exception (which isn't handled
yet)\n");
@@ -2227,7 +2228,6 @@
/* drill-down to array of sub call information for this subr_call_key
*/
sv_tmp = *hv_fetch((HV*)SvRV(sv_tmp), subr_call_key,
subr_call_key_len, 1);
- AV *subr_call_av;
if (!SvROK(sv_tmp)) { /* first call from this subname[fid:line] -
autoviv array ref */
subr_call_av = new_sub_call_info_av(aTHX);
--~--~---------~--~----~------------~-------~--~----~
You've received this message because you are subscribed to
the Devel::NYTProf Development User group.
Group hosted at: http://groups.google.com/group/develnytprof-dev
Project hosted at: http://perl-devel-nytprof.googlecode.com
CPAN distribution: http://search.cpan.org/dist/Devel-NYTProf
To post, email: [email protected]
To unsubscribe, email: [email protected]
-~----------~----~----~----~------~----~------~--~---
