#45 LX / Sequential File / Rewrite

unclassified
open
nobody
None
1
2014-07-28
2012-11-10
jean-max reymond
No

issue reported by this thread http://www.opencobol.org/modules/newbb/viewtopic.php?viewmode=flat&topic_id=1395&forum=1 is always valid on the svn version for linux plateforms (red hat).
Strangely, at line 145 of fileio.c, the macro SEEK_INIT is not always defined. So, seems working if SEEK_INIT is defined as

define SEEK_INIT(f) fseek ((FILE *)f->file, (off_t)0, SEEK_CUR)

So, I definitivly don't understand this sequence of code:

if !defined(linux)

define SEEK_INIT(f) fseek ((FILE *)f->file, (off_t)0, SEEK_CUR)

else

define SEEK_INIT(f)

endif

1 Attachments

Discussion