[gaim-migrate @ 5229]
[pidgin-git.git] / src / protocols / zephyr / ZClosePort.c
blob6cb1aca3cdb6ab012bda18acfef44194517abc23
1 /* This file is part of the Project Athena Zephyr Notification System.
2 * It contains source for the ZClosePort function.
4 * Created by: Robert French
6 * $Source$
7 * $Author: warmenhoven $
9 * Copyright (c) 1987 by the Massachusetts Institute of Technology.
10 * For copying and distribution information, see the file
11 * "mit-copyright.h".
13 /* $Header$ */
15 #include <internal.h>
17 #ifndef lint
18 static const char rcsid_ZClosePort_c[] = "$Id: ZClosePort.c 2096 2001-07-31 01:00:39Z warmenhoven $";
19 #endif
21 Code_t ZClosePort()
23 if (__Zephyr_fd >= 0 && __Zephyr_open)
24 (void) close(__Zephyr_fd);
26 __Zephyr_fd = -1;
27 __Zephyr_open = 0;
29 return (ZERR_NONE);