1 /* This file is part of the Project Athena Zephyr Notification System.
2 * It contains source for the ZFlushSubscriptions function.
4 * Created by: Robert French
6 * $Id: ZFlsSubs.c,v 1.5 1999/01/22 23:19:06 ghudson Exp $
8 * Copyright (c) 1987 by the Massachusetts Institute of Technology.
9 * For copying and distribution information, see the file
16 static const char rcsid_ZFlushSubscriptions_c[] = "$Id: ZFlsSubs.c,v 1.5 1999/01/22 23:19:06 ghudson Exp $";
19 Code_t ZFlushSubscriptions()
23 if (!__subscriptions_list)
26 for (i=0;i<__subscriptions_num;i++) {
27 free(__subscriptions_list[i].zsub_class);
28 free(__subscriptions_list[i].zsub_classinst);
29 free(__subscriptions_list[i].zsub_recipient);
32 free((char *)__subscriptions_list);
34 __subscriptions_list = 0;
35 __subscriptions_num = 0;