Author: dubiously
Date: Fri Jul  3 17:10:20 2009
New Revision: 798

Modified:
    trunk/NYTProf.xs

Log:
Hash keys length are only 32 bits while STRLEN may be 64

Modified: trunk/NYTProf.xs
==============================================================================
--- trunk/NYTProf.xs    (original)
+++ trunk/NYTProf.xs    Fri Jul  3 17:10:20 2009
@@ -3643,7 +3643,7 @@
                  /* add sub to NYTP_FIDi_SUBS_DEFINED hash */
                  sv = SvRV(*av_fetch(fid_fileinfo_av, fid, 1));
                  sv = SvRV(*av_fetch((AV *)sv, NYTP_FIDi_SUBS_DEFINED, 1));
-                (void)hv_store((HV *)sv, subname_pv, subname_len,  
newRV((SV*)av), 0);
+                (void)hv_store((HV *)sv, subname_pv, (I32)subname_len,  
newRV((SV*)av), 0);

                  break;
              }

--~--~---------~--~----~------------~-------~--~----~
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]
-~----------~----~----~----~------~----~------~--~---

Reply via email to