Re: [perl #127144] Native uint doesn't overflow on ++

[Juerd Waalboer]

Brian S. Julin via RT skribis 2016-01-03 15:37 (-0800):
> S02-types/native.t would seem a ood place for testing scalar sized uints.

Thanks. Unfortunately, I couldn't easily figure out how to write TODO
tests. So here's something that someone could copy and paste:

    # RT #127144, uint increment in sink context
    {
        sub d { "++ on uint$^n overflows to 0 in sink context" }
        my uint8  $uint8  = 0xff;               $uint8++;  is($uint8,  0, d 8);
        my uint16 $uint16 = 0xffff;             $uint16++; is($uint16, 0, d 16);
        my uint32 $uint32 = 0xffffffff;         $uint32++; is($uint32, 0, d 32);
        my uint64 $uint64 = 0xffffffffffffffff; $uint64++; is($uint64, 0, d 64);
    }
-- 
Met vriendelijke groet, // Kind regards, // Korajn salutojn,

Juerd Waalboer  <ju...@tnx.nl>
TNX