Craig A. Berry [Fri, 4 Jun 2010 03:17:39 +0000 (22:17 -0500)]
It overflows at compile time on 32-bit architectures, so the skip
isn't enough.
is($result, "\x{80000000}", "chopping high 'unicode' - result");
SKIP: {
+ no warnings 'overflow'; # avoid compile-time warnings below on 32-bit architectures
use Config;
$Config{ivsize} >= 8
or skip("this build can't handle very large characters", 2);