Revision: 1161
Author: dubiously
Date: Wed Mar 10 16:42:21 2010
Log: More 32/64-bit adjustments
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1161
Modified:
/trunk/FileHandle.xs
/trunk/NYTProf.xs
=======================================
--- /trunk/FileHandle.xs Wed Mar 10 16:26:20 2010
+++ /trunk/FileHandle.xs Wed Mar 10 16:42:21 2010
@@ -1135,7 +1135,7 @@
#endif
-int
+size_t
NYTP_write_comment(handle, comment)
NYTP_file handle
char *comment
=======================================
--- /trunk/NYTProf.xs Wed Mar 10 16:26:20 2010
+++ /trunk/NYTProf.xs Wed Mar 10 16:42:21 2010
@@ -440,7 +440,7 @@
/* XXX add options, $0, etc, but beware of embedded newlines */
/* XXX would be good to adopt a proper charset & escaping for these */
/* $^T */
- NYTP_write_attribute_unsigned(out, STR_WITH_LEN("basetime"),
PL_basetime);
+ NYTP_write_attribute_unsigned(out, STR_WITH_LEN("basetime"), (unsigned
long)PL_basetime);
NYTP_write_attribute_string(out, STR_WITH_LEN("xs_version"),
STR_WITH_LEN(XS_VERSION));
NYTP_write_attribute_string(out, STR_WITH_LEN("perl_version"),
version, sizeof(version) - 1);
NYTP_write_attribute_signed(out, STR_WITH_LEN("clock_id"),
profile_clock);
--
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]
