X-Git-Url: http://git.maemo.org/git/?a=blobdiff_plain;f=dev%2Farm%2Flibio-stringy-perl%2Fio-stringy-2.110%2Ftestout%2FIO_WrapTie.tlog;fp=dev%2Farm%2Flibio-stringy-perl%2Fio-stringy-2.110%2Ftestout%2FIO_WrapTie.tlog;h=4a21d35a255242b03604bc9ec626b55aa8a95c9c;hb=f477fa73365d491991707e7ed9217b48d6994551;hp=0000000000000000000000000000000000000000;hpb=da95c414033799c3a62606f299c3c00b5c77ca11;p=dh-make-perl

diff --git a/dev/arm/libio-stringy-perl/io-stringy-2.110/testout/IO_WrapTie.tlog b/dev/arm/libio-stringy-perl/io-stringy-2.110/testout/IO_WrapTie.tlog
new file mode 100644
index 0000000..4a21d35
--- /dev/null
+++ b/dev/arm/libio-stringy-perl/io-stringy-2.110/testout/IO_WrapTie.tlog
@@ -0,0 +1,23 @@
+1..6
+
+1: Construction
+1: ok 1
+
+2: print FH ARGS
+2:   S: "Hello, world!\n"
+2: ok 2
+
+3: FH->print(ARGS)
+3:   S: "Hello, world!\nHello, world!\n"
+3: ok 3
+
+4: FH->seek(0,0)
+4: ok 4
+
+5: array = <FH>
+5: ok 5
+
+6: FH->sref
+6: ok 6
+
+# END