diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 12:35:31 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 12:35:31 +0300 |
| commit | 8ceb5f934787eb7be5fb452fb39179df66119954 (patch) | |
| tree | 56a80fc5c118f7c2ebad7ab44bd8be048b2f7ec2 /vms/vms_fwrite.c | |
| parent | 2f83a4e72166e811a9f0b4726c19a3d5a0b17dcb (diff) | |
| download | egawk-8ceb5f934787eb7be5fb452fb39179df66119954.tar.gz egawk-8ceb5f934787eb7be5fb452fb39179df66119954.tar.bz2 egawk-8ceb5f934787eb7be5fb452fb39179df66119954.zip | |
Move to gawk-2.15.6.
Diffstat (limited to 'vms/vms_fwrite.c')
| -rw-r--r-- | vms/vms_fwrite.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/vms/vms_fwrite.c b/vms/vms_fwrite.c index 1cd31e6f..7ca8f5c4 100644 --- a/vms/vms_fwrite.c +++ b/vms/vms_fwrite.c @@ -3,7 +3,7 @@ */ /* - * Copyright (C) 1991-1993 the Free Software Foundation, Inc. + * Copyright (C) 1991-1995 the Free Software Foundation, Inc. * * This file is part of GAWK, the GNU implementation of the * AWK Progamming Language. @@ -69,7 +69,9 @@ tty_fwrite( const void *buf, size_t size, size_t number, FILE *file ) short chan; int file_num, result; - if (!file || !*file) + if (!size || !number) + return 0; + else if (!file || !*file) return 0 * (errno = EBADF); /* kludge alert! */ else if (file == prev_file) file_num = prev_file_num; |