/9pm/src/libc/port/hangup.c - Plan 9 from User Space

Plan 9 from User Space's /usr/local/plan9/9pm/src/libc/port/hangup.c

#include <9pm/u.h>
#include <9pm/libc.h>
#include <9pm/ctype.h>

/*
 *  force a connection to hangup
 */
int
hangup(int ctl)
{
	return write(ctl, "hangup", sizeof("hangup")-1) != sizeof("hangup")-1;
}