Permalink
Browse files

Verified building and testing fine with latest rakudo (2011-04)

  • Loading branch information...
1 parent 6d5db65 commit 17fab1d4fccde7ea2d496d1058002003265ec686 @cosimo committed Apr 22, 2011
Showing with 16 additions and 2 deletions.
  1. +1 −1 README
  2. +15 −1 t/socket-sanity.t
View
2 README
@@ -16,7 +16,7 @@ you can find at http://modules.perl6.org/
Current status
==============
-As of 2010-07-11, runs with all recent rakudo builds.
+As of 2011-04-22, runs with all recent rakudo builds.
It correctly follows redirects, but no infinite redirects
detection yet.
View
16 t/socket-sanity.t
@@ -1,8 +1,22 @@
use v6;
use Test;
-plan 1;
+plan 2;
my $s = IO::Socket::INET.new(:host('72.14.176.61'), :port(80));
ok($s, 'Socket object created');
+$s = IO::Socket::INET.new(
+ host => '72.14.176.61',
+ port => 80,
+);
+ok($s, 'Socket object created');
+
+# Fails with getaddrinfo: inappropriate ioctl for device ??
+#$s = IO::Socket::INET.new(
+# host => '2620:0:1cfe:face:b00c::3',
+# port => 80,
+# family => PIO::PF_INET6,
+#);
+#ok($s, 'Socket object to IPv6 address created');
+

0 comments on commit 17fab1d

Please sign in to comment.