comparison plugins/zephyr/ZFlsSubs.c @ 1700:1e0fa7e130d0

[gaim-migrate @ 1710] Zephyr. committer: Tailor Script <tailor@pidgin.im>
author Eric Warmenhoven <eric@warmenhoven.org>
date Thu, 12 Apr 2001 09:21:16 +0000
parents
children
comparison
equal deleted inserted replaced
1699:644056e095f1 1700:1e0fa7e130d0
1 /* This file is part of the Project Athena Zephyr Notification System.
2 * It contains source for the ZFlushSubscriptions function.
3 *
4 * Created by: Robert French
5 *
6 * $Source$
7 * $Author: warmenhoven $
8 *
9 * Copyright (c) 1987 by the Massachusetts Institute of Technology.
10 * For copying and distribution information, see the file
11 * "mit-copyright.h".
12 */
13 /* $Header$ */
14
15 #include <internal.h>
16
17 #ifndef lint
18 static const char rcsid_ZFlushSubscriptions_c[] = "$Id: ZFlsSubs.c 1710 2001-04-12 09:21:16Z warmenhoven $";
19 #endif
20
21 Code_t ZFlushSubscriptions()
22 {
23 register int i;
24
25 if (!__subscriptions_list)
26 return (ZERR_NONE);
27
28 for (i=0;i<__subscriptions_num;i++) {
29 free(__subscriptions_list[i].zsub_class);
30 free(__subscriptions_list[i].zsub_classinst);
31 free(__subscriptions_list[i].zsub_recipient);
32 }
33
34 free((char *)__subscriptions_list);
35
36 __subscriptions_list = 0;
37 __subscriptions_num = 0;
38
39 return (ZERR_NONE);
40 }
41