libpurple/protocols/zephyr/ZClosePort.c

   1 /* This file is part of the Project Athena Zephyr Notification System.
   2  * It contains source for the ZClosePort function.
   3  *
   4  *      Created by:     Robert French
   5  *
   6  *      Copyright (c) 1987 by the Massachusetts Institute of Technology.
   7  *      For copying and distribution information, see the file
   8  *      "mit-copyright.h".
   9  */
  10
  11 #include "internal.h"
  12
  13 Code_t ZClosePort()
  14 {
  15     if (__Zephyr_fd >= 0 && __Zephyr_open)
  16         (void) close(__Zephyr_fd);
  17
  18     __Zephyr_fd = -1;
  19     __Zephyr_open = 0;
  20
  21     return (ZERR_NONE);
  22 }