]> gitweb.factorcode.org Git - factor.git/commitdiff
io.files.windows: SetFilePointer takes a PLONG not a uint pointer.
authorDoug Coleman <doug.coleman@gmail.com>
Sat, 10 Oct 2015 02:50:06 +0000 (19:50 -0700)
committerDoug Coleman <doug.coleman@gmail.com>
Sat, 10 Oct 2015 02:50:06 +0000 (19:50 -0700)
basis/io/files/windows/windows.factor

index 222f96ac310849b49bce64f31225f31bb9b90f1c..1c83af35ec32015390411ad0b88e964acaa93281 100755 (executable)
@@ -263,7 +263,7 @@ M: windows init-stdio
     GetLastError ERROR_ALREADY_EXISTS = not ;
 
 : set-file-pointer ( handle length method -- )
-    [ [ handle>> ] dip d>w/w uint <ref> ] dip SetFilePointer
+    [ [ handle>> ] dip d>w/w LONG <ref> ] dip SetFilePointer
     INVALID_SET_FILE_POINTER = [ "SetFilePointer failed" throw ] when ;
 
 M: windows (file-reader) ( path -- stream )