From a6eec37ed8bc81a32415735164c645acfec1e80a Mon Sep 17 00:00:00 2001 From: ljrittle Date: Tue, 15 May 2001 21:24:41 +0000 Subject: [PATCH] * libI77/endfile.c (t_runc): Add cast to help case where ftruncate() prototype is somehow missing even though autoconf test found it properly. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@42120 138bc75d-0d04-0410-961f-82ee72b054a4 --- libf2c/ChangeLog | 6 ++++++ libf2c/libI77/endfile.c | 5 ++++- 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog index 5206fa8..c535023 100644 --- a/libf2c/ChangeLog +++ b/libf2c/ChangeLog @@ -1,3 +1,9 @@ +2001-05-15 Loren J. Rittle + + * libI77/endfile.c (t_runc): Add cast to help case where + ftruncate() prototype is somehow missing even though autoconf + test found it properly. + 2001-02-26 Toon Moene * libI77/configure.in: Test for ftruncate. diff --git a/libf2c/libI77/endfile.c b/libf2c/libI77/endfile.c index 8e60d05..7b009c7 100644 --- a/libf2c/libI77/endfile.c +++ b/libf2c/libI77/endfile.c @@ -129,7 +129,10 @@ done: f__cf = b->ufd = bf; #else /* !defined(HAVE_FTRUNCATE) */ fflush(b->ufd); - rc = ftruncate(fileno(b->ufd),loc); + /* The cast of loc is helpful on FreeBSD. It helps + in any case where ftruncate() prototype is somehow missing + even though autoconf test found it properly. */ + rc = ftruncate(fileno(b->ufd), (off_t)loc); #endif /* !defined(HAVE_FTRUNCATE) */ if (rc) err(a->aerr,111,"endfile"); -- 2.7.4