X-Git-Url: https://pd.if.org/git/?p=pdclib;a=blobdiff_plain;f=platform%2Fwin32%2Ffunctions%2F_PDCLIB%2F_PDCLIB_seek.c;h=3add6591c535962fc775a9a311759bcb0b64f8de;hp=c4c25f87b281829627a943d006101b6f51c5352d;hb=04ff9a4a124eaa87d5d26d90077fb4ed15f3277f;hpb=9b38723dad57f9eb49abdb2a6cde699c658c83fc

diff --git a/platform/win32/functions/_PDCLIB/_PDCLIB_seek.c b/platform/win32/functions/_PDCLIB/_PDCLIB_seek.c
index c4c25f8..3add659 100644
--- a/platform/win32/functions/_PDCLIB/_PDCLIB_seek.c
+++ b/platform/win32/functions/_PDCLIB/_PDCLIB_seek.c
@@ -10,11 +10,20 @@
 #include <errno.h>
 #ifndef REGTEST
 #include <_PDCLIB_glue.h>
+#include <windows.h>
 
+extern void _PDCLIB_w32errno( void );
 _PDCLIB_int64_t _PDCLIB_seek( struct _PDCLIB_file_t * stream, _PDCLIB_int64_t offset, int whence )
 {
-    errno = ENOTSUP;
-    return EOF;
+    LARGE_INTEGER liOffset;
+    liOffset.QuadPart = offset;
+    BOOL rv = SetFilePointerEx( stream->handle, liOffset, &liOffset, whence );
+    if(!rv) {
+        _PDCLIB_w32errno();
+        return EOF;
+    }
+    stream->pos.offset = liOffset.QuadPart;
+    return liOffset.QuadPart;
 }
 
 #endif