summaryrefslogtreecommitdiff
path: root/lib/ZClosePort.c
blob: 0853d00c60121f3abb776caadf5e5e3286822e60 (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
/* 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$ */

#include <zephyr/mit-copyright.h>

#include <zephyr/zephyr_internal.h>

Code_t ZClosePort()
{
	if (__Zephyr_fd >= 0)
		close(__Zephyr_fd);

	__Zephyr_fd = -1;

	return (ZERR_NONE);
}