Revision: 1337
Author: [email protected]
Date: Thu Jul 15 08:30:03 2010
Log: Fix some compiler warnings
http://www.cpantesters.org/cpan/report/aa06dfea-8f19-11df-a1aa-55996e8696e0
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1337
Modified:
/trunk/FileHandle.xs
/trunk/NYTProf.xs
=======================================
--- /trunk/FileHandle.xs Wed Jul 7 10:05:28 2010
+++ /trunk/FileHandle.xs Thu Jul 15 08:30:03 2010
@@ -893,7 +893,7 @@
size_t total;
size_t retval;
- total += retval = NYTP_write_attribute_unsigned(ofile,
STR_WITH_LEN("sawampersand_fid"), fid);
+ total = retval = NYTP_write_attribute_unsigned(ofile,
STR_WITH_LEN("sawampersand_fid"), fid);
if (retval < 1)
return retval;
=======================================
--- /trunk/NYTProf.xs Wed Jul 7 10:05:28 2010
+++ /trunk/NYTProf.xs Thu Jul 15 08:30:03 2010
@@ -551,10 +551,10 @@
static const char *
eval_prefix(const char *filename, const char *prefix, STRLEN prefix_len) {
if (memEQ(filename, prefix, prefix_len)
- && isdigit(filename[prefix_len])) {
+ && isdigit((int)filename[prefix_len])) {
const char *s = filename + prefix_len + 1;
- while (isdigit(*s))
+ while (isdigit((int)*s))
++s;
if (s[0] == ')')
return s;
@@ -810,7 +810,7 @@
}
-static Hash_entry *
+static Hash_entry * /* currently unused */
lookup_file_entry(pTHX_ char* file_name, STRLEN file_name_len) {
Hash_entry entry, *found;
--
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]
