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