Test .head works correctly with large negative Ints

zoffixznet · zoffixznet · commit dc7447626b8f · 2017-10-15T04:51:38.000-04:00
RT#130285: https://rt.perl.org/Ticket/Display.html?id=130285
diff --git a/S32-list/head.t b/S32-list/head.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 24;
+plan 25;
 
 =begin description
 
@@ -67,4 +67,8 @@ This test tests the C<head> builtin.
     is $range.head(5).List, (), "Range.head works if empty";
 } #3
 
+# RT #130285
+is-deeply (4,5,6).head(-999999999999999999999999999), (),
+    '.head works correctly with large negative Ints';
+
 # vim: ft=perl6
