From 3950ffe2a485479f6561c27364d3d7df5a21d124 Mon Sep 17 00:00:00 2001 From: Igor Pashev Date: Sun, 24 Jun 2012 22:28:35 +0000 Subject: Imported Upstream version 93u+ --- src/lib/libast/misc/procfree.c | 43 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) create mode 100644 src/lib/libast/misc/procfree.c (limited to 'src/lib/libast/misc/procfree.c') diff --git a/src/lib/libast/misc/procfree.c b/src/lib/libast/misc/procfree.c new file mode 100644 index 0000000..d14ff35 --- /dev/null +++ b/src/lib/libast/misc/procfree.c @@ -0,0 +1,43 @@ +/*********************************************************************** +* * +* This software is part of the ast package * +* Copyright (c) 1985-2011 AT&T Intellectual Property * +* and is licensed under the * +* Eclipse Public License, Version 1.0 * +* by AT&T Intellectual Property * +* * +* A copy of the License is available at * +* http://www.eclipse.org/org/documents/epl-v10.html * +* (with md5 checksum b35adb5213ca9657e911e9befb180842) * +* * +* Information and Software Systems Research * +* AT&T Research * +* Florham Park NJ * +* * +* Glenn Fowler * +* David Korn * +* Phong Vo * +* * +***********************************************************************/ +#pragma prototyped +/* + * Glenn Fowler + * AT&T Research + * + * free a proc opened by procopen() + * skipping wait() and close() + */ + +#include "proclib.h" + +int +procfree(register Proc_t* p) +{ + if (!p) + return -1; + if (p == &proc_default) + p->pid = -1; + else + free(p); + return 0; +} -- cgit v1.2.3