// Created: 11/07/98
// RCS-ID: $Id$
// Copyright: (c) Guilhem Lavaux
-// Licence: wxWindows license
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
+#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
#pragma implementation "wfstream.h"
#endif
off_t wxFFileInputStream::OnSysSeek(off_t pos, wxSeekMode mode)
{
- return ( m_file->Seek(pos, mode) ? pos : wxInvalidOffset );
+#ifdef __VMS
+#pragma message disable intsignchange
+#endif
+ return ( m_file->Seek(pos, mode) ? m_file->Tell() : wxInvalidOffset );
+#ifdef __VMS
+#pragma message enable intsignchange
+#endif
}
off_t wxFFileInputStream::OnSysTell() const
off_t wxFFileOutputStream::OnSysSeek(off_t pos, wxSeekMode mode)
{
- return ( m_file->Seek(pos, mode) ? pos : wxInvalidOffset );
+#ifdef __VMS
+#pragma message disable intsignchange
+#endif
+ return ( m_file->Seek(pos, mode) ? m_file->Tell() : wxInvalidOffset );
+#ifdef __VMS
+#pragma message enable intsignchange
+#endif
}
void wxFFileOutputStream::Sync()