From 1f74a73cf64484ce349182d7fb8137a3dc9d75ed Mon Sep 17 00:00:00 2001
From: dukeleto <dukeleto@d31e2699-5ff4-0310-a27c-f18f2fbe73fe>
Date: Sun, 25 Apr 2010 19:45:48 +0000
Subject: [PATCH] [TT# 1592][t] Improve test for open opcode delegation. All
 tests in the file pass in both optimized/unoptimized builds on darwin/x86

git-svn-id: https://svn.parrot.org/parrot/trunk@46014 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
---
 t/op/io.t | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/t/op/io.t b/t/op/io.t
index cb37607f46..09cce13ecf 100644
--- a/t/op/io.t
+++ b/t/op/io.t
@@ -44,6 +44,7 @@ Tests various io opcodes.
     set classes['FileHandle'], classid
 
     $P1 = open '/foo'
+    is($P1,42,'open opcode delegates to the open method on the FileHandle PMC')
 
     # replace the original, so we don't break other tests
     set classes['FileHandle'], $I0
@@ -166,7 +167,7 @@ Tests various io opcodes.
 
 .sub open :method
     .param pmc args :slurpy
-    ok(1,'open opcode delegates to the FileHandle PMC')
+    .return(42)
 .end
 
 
-- 
2.11.4.GIT