annotate oldXMenu/XDestAssoc.c @ 57191:bd5d1158ebcf

(ido-choice-list): New dynamic var for `list' context. (ido-context-switch-command): New dynamic var. (ido-define-mode-map): Generalize switch between file/buffer contexts. (ido-read-internal): Handle new `list' context. Handle insert-buffer and insert-file ido-exit values. (ido-buffer-internal): New arg switch-cmd. Use it to setup ido-context-switch-command. Handle insert-file ido-exit value. (ido-read-buffer): Set ido-context-switch-command to 'ignore unless it is already bound by caller. (ido-file-internal): New arg switch-cmd. Use it to setup ido-context-switch-command. Handle insert-buffer ido-exit value. (ido-enter-insert-buffer, ido-enter-insert-file): New commands used for context switching. (ido-all-completions): Handle new `list' context. (ido-make-choice-list): Return choices for `list' context. (ido-find-file-in-dir, ido-display-file, ido-write-file) (ido-display-buffer, ido-kill-buffer): Disable context switching. (ido-insert-buffer, ido-insert-file): Setup context switching. (ido-exhibit): Handle `list' context. (ido-read-file-name): Disable context switching. Handle fallback. (ido-read-directory-name): Disable context switching. (ido-completing-read): New defun like completing-read. Setup and use new `list' context.
author Kim F. Storm <storm@cua.dk>
date Wed, 22 Sep 2004 22:49:07 +0000
parents e8824c4f5f7e
children 3861ff8f4bf1
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
Dave Love <fx@gnu.org>
parents:
diff changeset
3 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
4 Permission to use, copy, modify, distribute, and sell this software and its
Dave Love <fx@gnu.org>
parents:
diff changeset
5 documentation for any purpose is hereby granted without fee, provided that
Dave Love <fx@gnu.org>
parents:
diff changeset
6 the above copyright notice appear in all copies and that both that
Dave Love <fx@gnu.org>
parents:
diff changeset
7 copyright notice and this permission notice appear in supporting
Dave Love <fx@gnu.org>
parents:
diff changeset
8 documentation, and that the name of M.I.T. not be used in advertising or
Dave Love <fx@gnu.org>
parents:
diff changeset
9 publicity pertaining to distribution of the software without specific,
Dave Love <fx@gnu.org>
parents:
diff changeset
10 written prior permission. M.I.T. makes no representations about the
Dave Love <fx@gnu.org>
parents:
diff changeset
11 suitability of this software for any purpose. It is provided "as is"
Dave Love <fx@gnu.org>
parents:
diff changeset
12 without express or implied warranty.
Dave Love <fx@gnu.org>
parents:
diff changeset
13 */
Dave Love <fx@gnu.org>
parents:
diff changeset
14
Dave Love <fx@gnu.org>
parents:
diff changeset
15 #include <X11/Xlib.h>
Dave Love <fx@gnu.org>
parents:
diff changeset
16 #include "X10.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
17
Dave Love <fx@gnu.org>
parents:
diff changeset
18 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
19 * XDestroyAssocTable - Destroy (free the memory associated with)
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 25858
diff changeset
20 * an XAssocTable.
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
21 */
Dave Love <fx@gnu.org>
parents:
diff changeset
22 XDestroyAssocTable(table)
Dave Love <fx@gnu.org>
parents:
diff changeset
23 register XAssocTable *table;
Dave Love <fx@gnu.org>
parents:
diff changeset
24 {
Dave Love <fx@gnu.org>
parents:
diff changeset
25 register int i;
Dave Love <fx@gnu.org>
parents:
diff changeset
26 register XAssoc *bucket;
Dave Love <fx@gnu.org>
parents:
diff changeset
27 register XAssoc *Entry, *entry_next;
Dave Love <fx@gnu.org>
parents:
diff changeset
28
Dave Love <fx@gnu.org>
parents:
diff changeset
29 /* Free the buckets. */
Dave Love <fx@gnu.org>
parents:
diff changeset
30 for (i = 0; i < table->size; i++) {
Dave Love <fx@gnu.org>
parents:
diff changeset
31 bucket = &table->buckets[i];
Dave Love <fx@gnu.org>
parents:
diff changeset
32 for (
Dave Love <fx@gnu.org>
parents:
diff changeset
33 Entry = bucket->next;
Dave Love <fx@gnu.org>
parents:
diff changeset
34 Entry != bucket;
Dave Love <fx@gnu.org>
parents:
diff changeset
35 Entry = entry_next
Dave Love <fx@gnu.org>
parents:
diff changeset
36 ) {
Dave Love <fx@gnu.org>
parents:
diff changeset
37 entry_next = Entry->next;
Dave Love <fx@gnu.org>
parents:
diff changeset
38 free((char *)Entry);
Dave Love <fx@gnu.org>
parents:
diff changeset
39 }
Dave Love <fx@gnu.org>
parents:
diff changeset
40 }
Dave Love <fx@gnu.org>
parents:
diff changeset
41
Dave Love <fx@gnu.org>
parents:
diff changeset
42 /* Free the bucket array. */
Dave Love <fx@gnu.org>
parents:
diff changeset
43 free((char *)table->buckets);
Dave Love <fx@gnu.org>
parents:
diff changeset
44
Dave Love <fx@gnu.org>
parents:
diff changeset
45 /* Free the table. */
Dave Love <fx@gnu.org>
parents:
diff changeset
46 free((char *)table);
Dave Love <fx@gnu.org>
parents:
diff changeset
47 }
Dave Love <fx@gnu.org>
parents:
diff changeset
48
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
49 /* arch-tag: a536bf02-8d63-45f2-8c1a-c7f9fd4da2cf
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
50 (do not change this comment) */