Fix Devel::PeekPoke on cygwin perls
authorPeter Rabbitson <ribasushi@cpan.org>
Sat, 29 Dec 2012 08:36:59 +0000 (09:36 +0100)
committerPeter Rabbitson <ribasushi@cpan.org>
Sat, 29 Dec 2012 10:17:14 +0000 (11:17 +0100)
commit569e5f292f0a6cd954c8da5ce3f389d8dd8485ce
tree23d54e27b8baff7673fe937da6a9922598647113
parent3c460c4161f68e8e9a9ceaaf5eb7bd2362a7be58
Fix Devel::PeekPoke on cygwin perls

Apparently how data is written into a union larger than the variable type is
entirely compiler/paltform dependent. In cases when ivsize > ptrsize we need
to find out exactly which part of the (ivsize sized) svu_pv will hold the
pointer before we go overwriting it. The previous assumption this offset is
always 0 turned out to be false.

Add some extra test suite diags while we are at it as well.
Changes
lib/Devel/PeekPoke/PP.pm
t/00info.t