X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fop%2Fmisc.t;h=5bcc6a02a878799a7b0ec554073ec1976bdc0615;hb=2ace3117e8814e0a6ee3b0c45306adda1a3bba77;hp=024a514a6ca4072fe925da2b13fbb6f81a156d8f;hpb=92d69e20477bd17b2201cccdad79af847a7313f5;p=p5sagit%2Fp5-mst-13.2.git diff --git a/t/op/misc.t b/t/op/misc.t index 024a514..5bcc6a0 100755 --- a/t/op/misc.t +++ b/t/op/misc.t @@ -37,6 +37,8 @@ for (@prgs){ } __END__ +()=() +######## $cusp = ~0 ^ (~0 >> 1); $, = " "; print +($cusp - 1) % 8, $cusp % 8, -$cusp % 8, ($cusp + 1) % 8, "!\n";