--- IO-AIO/AIO.xs	2007/10/03 21:27:51	1.107
+++ IO-AIO/AIO.xs	2007/10/04 12:50:35	1.108
@@ -526,7 +526,7 @@
                   );
 
                   if (do_open (gv, sym, symlen, 0, 0, 0, 0))
-                    fh = gv;
+                    fh = (SV *)gv;
                 }
 
               XPUSHs (fh);
@@ -1545,7 +1545,7 @@
         if (fd < 0)
           croak ("aio_close called with fd-less filehandle");
 
-        PerlIO_binmode (io, 0, 0, 0);
+        PerlIO_binmode (aTHX_ io, 0, 0, 0);
 
         {
           dREQ;