[svn:parrot] r47711 - trunk/t/pmc

[NotFound at svn.parrot.org]

Author: NotFound
Date: Sat Jun 19 14:38:41 2010
New Revision: 47711
URL: https://trac.parrot.org/parrot/changeset/47711

Log:
test StringHanlde get_fd method

Modified:
   trunk/t/pmc/stringhandle.t

Modified: trunk/t/pmc/stringhandle.t
==============================================================================
--- trunk/t/pmc/stringhandle.t	Sat Jun 19 12:35:49 2010	(r47710)
+++ trunk/t/pmc/stringhandle.t	Sat Jun 19 14:38:41 2010	(r47711)
@@ -7,7 +7,7 @@
 use lib qw( . lib ../lib ../../lib );
 
 use Test::More;
-use Parrot::Test tests => 23;
+use Parrot::Test tests => 24;
 
 =head1 NAME
 
@@ -94,6 +94,23 @@
 1
 OUT
 
+# StringHandle doesn't use file descriptor, get_fd always return -1
+pir_output_is( <<'CODE', <<'OUT', 'get_fd method' );
+.sub test :main
+    .local pmc sh
+    .local int fd
+    sh = new ['StringHandle']
+    fd = sh.'get_fd'()
+    say fd
+    sh.'open'('mockname', 'r')
+    fd = sh.'get_fd'()
+    say fd
+.end
+CODE
+-1
+-1
+OUT
+
 SKIP: {
     skip 'no asynch calls yet' => 1;