streams: use Boolean return value for stdio_fseek.

* stream.c (stdio_seek): Handle new-style Boolean return from
stdio_fseek.

* sysif.c (stdio_fseek): Return an int indication that is 1
for success, 0 for failure. There was a mistaken assumption
here that fseeko returns the file offset, and the return value
in the fseek case was mistakenly harmonized, using a wasteful
call to stdio_ftell. The only call to this function relies
only on a Boolean success/fail indication.

* sysif.h (stdio_fseek): Declaration updated.

1 files changed, 1 insertions, 1 deletions

diff --git a/sysif.h b/sysif.h
index 02a5a1da..4e971e3d 100644
--- a/sysif.h
+++ b/sysif.h
@@ -59,7 +59,7 @@ val statf(val path);
 off_t off_t_num(val num, val self);
 val num_off_t(off_t offnum);
 val stdio_ftell(FILE *);
-val stdio_fseek(FILE *, val, int whence);
+int stdio_fseek(FILE *, val, int whence);
 #if HAVE_GETEUID
 void repress_privilege(void);
 void drop_privilege(void);