Index: trunk/server/t/incrdecr.t
===================================================================
--- trunk/server/t/incrdecr.t (revision 357)
+++ trunk/server/t/incrdecr.t (revision 608)
@@ -2,5 +2,5 @@
 
 use strict;
-use Test::More tests => 13;
+use Test::More tests => 16;
 use FindBin qw($Bin);
 use lib "$Bin/lib";
@@ -31,4 +31,13 @@
 is(scalar <$sock>, "0\r\n", "- 5 = 0");
 
+print $sock "incr num ".(2**32-2)."\r\n";
+is(scalar <$sock>, (2**32-2)."\r\n", "+ ".(2**32-2)." = ".(2**32-2));
+
+print $sock "incr num 1\r\n";
+is(scalar <$sock>, (2**32-1)."\r\n", "+ 1 = ".(2**32-1));
+
+print $sock "incr num 1\r\n";
+is(scalar <$sock>, "0\r\n", "+ 1 = 0");
+
 print $sock "decr bogus 5\r\n";
 is(scalar <$sock>, "NOT_FOUND\r\n", "can't decr bogus key");
@@ -41,4 +50,2 @@
 print $sock "incr text 1\r\n";
 is(scalar <$sock>, "1\r\n", "hi - 1 = 0");
-
-