shared hash keys and ++/--

[perl5.git] / lib / integer.t

diff --git a/lib/integer.t b/lib/integer.t
index 4184747..946103d 100644 (file)
--- a/lib/integer.t
+++ b/lib/integer.t
@@ -1,3 +1,10 @@
+#!./perl
+
+BEGIN {
+    chdir 't' if -d 't';
+    @INC = '../lib';
+}
+
 use integer;
 
 use Test::More tests => 11;
@@ -43,4 +50,4 @@ SKIP: {
     }
 }
 
-is(~0, -1, "unsigned");
+is(~0, -1, "signed instead of unsigned");