Mercurial > emacs
annotate oldXMenu/XDestAssoc.c @ 51380:0254c3b1ede8
(openp): Make sure STR is a string.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Sun, 01 Jun 2003 18:03:00 +0000 |
parents | 23a1cea22d13 |
children | 695cf19ef79e d7ddb3e565de |
rev | line source |
---|---|
25858 | 1 /* $XConsortium: XDestAssoc.c,v 10.17 91/02/08 13:11:50 rws Exp $ */ |
2 /* Copyright Massachusetts Institute of Technology 1985 */ | |
3 | |
4 /* | |
5 Permission to use, copy, modify, distribute, and sell this software and its | |
6 documentation for any purpose is hereby granted without fee, provided that | |
7 the above copyright notice appear in all copies and that both that | |
8 copyright notice and this permission notice appear in supporting | |
9 documentation, and that the name of M.I.T. not be used in advertising or | |
10 publicity pertaining to distribution of the software without specific, | |
11 written prior permission. M.I.T. makes no representations about the | |
12 suitability of this software for any purpose. It is provided "as is" | |
13 without express or implied warranty. | |
14 */ | |
15 | |
16 #include <X11/Xlib.h> | |
17 #include "X10.h" | |
18 | |
19 /* | |
20 * XDestroyAssocTable - Destroy (free the memory associated with) | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25858
diff
changeset
|
21 * an XAssocTable. |
25858 | 22 */ |
23 XDestroyAssocTable(table) | |
24 register XAssocTable *table; | |
25 { | |
26 register int i; | |
27 register XAssoc *bucket; | |
28 register XAssoc *Entry, *entry_next; | |
29 | |
30 /* Free the buckets. */ | |
31 for (i = 0; i < table->size; i++) { | |
32 bucket = &table->buckets[i]; | |
33 for ( | |
34 Entry = bucket->next; | |
35 Entry != bucket; | |
36 Entry = entry_next | |
37 ) { | |
38 entry_next = Entry->next; | |
39 free((char *)Entry); | |
40 } | |
41 } | |
42 | |
43 /* Free the bucket array. */ | |
44 free((char *)table->buckets); | |
45 | |
46 /* Free the table. */ | |
47 free((char *)table); | |
48 } | |
49 |