use nqp::seekfh on moar and $!PIO.seek on jvm/parrot

rakudo · Apr 16, 2014 · fbf3873 · fbf3873
1 parent 8bac4dd
commit fbf3873
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/src/core/IO.pm b/src/core/IO.pm
@@ -205,7 +205,12 @@ my class IO::Handle does IO::FileTestable {
     #   1 -- seek relative to current position
     #   2 -- seek from the end of the file
     method seek(IO::Handle:D: Int:D $offset, Int:D $whence) {
+#?if moar
+        nqp::seekfh($!PIO, $offset, $whence);
+#?endif
+#?if !moar
         $!PIO.seek(nqp::unbox_i($whence), nqp::unbox_i($offset));
+#?endif
         True;
     }
     method tell(IO::Handle:D:) returns Int {

diff --git a/tools/build/NQP_REVISION b/tools/build/NQP_REVISION
@@ -1 +1 @@
-2014.03-66-g1cf05eb
+2014.03-75-g6135feb