1/* gzclose.c contains minimal changes required to be compiled with zlibWrapper:
2 * - gz_statep was converted to union to work with -Wstrict-aliasing=1      */
3
4/* gzclose.c -- zlib gzclose() function
5 * Copyright (C) 2004, 2010 Mark Adler
6 * For conditions of distribution and use, see http://www.zlib.net/zlib_license.html
7 */
8
9#include "gzguts.h"
10
11/* gzclose() is in a separate file so that it is linked in only if it is used.
12   That way the other gzclose functions can be used instead to avoid linking in
13   unneeded compression or decompression routines. */
14int ZEXPORT gzclose(file)
15    gzFile file;
16{
17#ifndef NO_GZCOMPRESS
18    gz_statep state;
19
20    if (file == NULL)
21        return Z_STREAM_ERROR;
22    state.file = file;
23
24    return state.state->mode == GZ_READ ? gzclose_r(file) : gzclose_w(file);
25#else
26    return gzclose_r(file);
27#endif
28}
29