blob: 64e110df413a662344844a2299be8785f927a25b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
/* This file is part of the Project Athena Zephyr Notification System.
* It contains source for the ZClosePort function.
*
* Created by: Robert French
*
* $Source$
* $Author$
*
* Copyright (c) 1987 by the Massachusetts Institute of Technology.
* For copying and distribution information, see the file
* "mit-copyright.h".
*/
/* $Header$ */
#ifndef lint
static char rcsid_ZClosePort_c[] = "$Id$";
#endif
#include <zephyr/mit-copyright.h>
#include <zephyr/zephyr_internal.h>
Code_t ZClosePort()
{
if (__Zephyr_fd >= 0 && __Zephyr_open)
(void) close(__Zephyr_fd);
__Zephyr_fd = -1;
__Zephyr_open = 0;
return (ZERR_NONE);
}
|
