annotate oldXMenu/XDestAssoc.c @ 105798:0ad1fc06bfc8

* puresize.h (BASE_PURESIZE): Increase to 1470000. * lread.c (Fload): Purecopy the file name when building Vpreloaded_file_list. * textmodes/ispell.el (ispell-skip-region-alist): * international/mule-conf.el (eight-bit): * international/fontset.el (font-encoding-alist): * startup.el (pure-space-overflow-message): * simple.el (overwrite-mode-textual, overwrite-mode-binary): * paths.el (gnus-nntp-service, rmail-spool-directory) (term-file-prefix): * files.el (save-some-buffers-action-alist): * cmuscheme.el (same-window-buffer-names): * ielm.el (same-window-buffer-names): * shell.el (same-window-buffer-names): * mail/sendmail.el (same-window-buffer-names): * progmodes/inf-lisp.el (same-window-buffer-names): * bindings.el (mode-line-client) (mode-line-column-line-number-mode-map): * language/tibetan.el (tibetan-precomposition-rule-regexp) (tibetan-precomposed-regexp): Purecopy string arguments.
author Dan Nicolaescu <dann@ics.uci.edu>
date Fri, 30 Oct 2009 02:00:11 +0000
parents fec5e03aaf59
children ec58e5c426ef 5cc91198ffb2
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
1 /* Copyright Massachusetts Institute of Technology 1985 */
Dave Love <fx@gnu.org>
parents:
diff changeset
2
76133
995b45abe69d Remove license text in favour of including copyright.h, as was done in
Glenn Morris <rgm@gnu.org>
parents: 75348
diff changeset
3 #include "copyright.h"
995b45abe69d Remove license text in favour of including copyright.h, as was done in
Glenn Morris <rgm@gnu.org>
parents: 75348
diff changeset
4
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
5
Dave Love <fx@gnu.org>
parents:
diff changeset
6 #include <X11/Xlib.h>
Dave Love <fx@gnu.org>
parents:
diff changeset
7 #include "X10.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
8
Dave Love <fx@gnu.org>
parents:
diff changeset
9 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
10 * XDestroyAssocTable - Destroy (free the memory associated with)
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 25858
diff changeset
11 * an XAssocTable.
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
12 */
Dave Love <fx@gnu.org>
parents:
diff changeset
13 XDestroyAssocTable(table)
Dave Love <fx@gnu.org>
parents:
diff changeset
14 register XAssocTable *table;
Dave Love <fx@gnu.org>
parents:
diff changeset
15 {
Dave Love <fx@gnu.org>
parents:
diff changeset
16 register int i;
Dave Love <fx@gnu.org>
parents:
diff changeset
17 register XAssoc *bucket;
Dave Love <fx@gnu.org>
parents:
diff changeset
18 register XAssoc *Entry, *entry_next;
Dave Love <fx@gnu.org>
parents:
diff changeset
19
Dave Love <fx@gnu.org>
parents:
diff changeset
20 /* Free the buckets. */
Dave Love <fx@gnu.org>
parents:
diff changeset
21 for (i = 0; i < table->size; i++) {
Dave Love <fx@gnu.org>
parents:
diff changeset
22 bucket = &table->buckets[i];
Dave Love <fx@gnu.org>
parents:
diff changeset
23 for (
Dave Love <fx@gnu.org>
parents:
diff changeset
24 Entry = bucket->next;
Dave Love <fx@gnu.org>
parents:
diff changeset
25 Entry != bucket;
Dave Love <fx@gnu.org>
parents:
diff changeset
26 Entry = entry_next
Dave Love <fx@gnu.org>
parents:
diff changeset
27 ) {
Dave Love <fx@gnu.org>
parents:
diff changeset
28 entry_next = Entry->next;
Dave Love <fx@gnu.org>
parents:
diff changeset
29 free((char *)Entry);
Dave Love <fx@gnu.org>
parents:
diff changeset
30 }
Dave Love <fx@gnu.org>
parents:
diff changeset
31 }
Dave Love <fx@gnu.org>
parents:
diff changeset
32
Dave Love <fx@gnu.org>
parents:
diff changeset
33 /* Free the bucket array. */
Dave Love <fx@gnu.org>
parents:
diff changeset
34 free((char *)table->buckets);
Dave Love <fx@gnu.org>
parents:
diff changeset
35
Dave Love <fx@gnu.org>
parents:
diff changeset
36 /* Free the table. */
Dave Love <fx@gnu.org>
parents:
diff changeset
37 free((char *)table);
Dave Love <fx@gnu.org>
parents:
diff changeset
38 }
Dave Love <fx@gnu.org>
parents:
diff changeset
39
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
40 /* arch-tag: a536bf02-8d63-45f2-8c1a-c7f9fd4da2cf
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
41 (do not change this comment) */