Mercurial > emacs
annotate oldXMenu/XCrAssoc.c @ 68355:1f46740719ec
*** empty log message ***
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Mon, 23 Jan 2006 13:54:37 +0000 |
parents | 3861ff8f4bf1 |
children | e8a3fb527b77 2d92f5c9d6ae |
rev | line source |
---|---|
25858 | 1 /* Copyright Massachusetts Institute of Technology 1985 */ |
65000
3861ff8f4bf1
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
54770
diff
changeset
|
2 /* Copyright (C) 2002, 2003, 2004, 2005 Free Software Foundation, Inc. */ |
25858 | 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 <config.h> | |
17 #include <X11/Xlib.h> | |
18 #include <errno.h> | |
19 #include "X10.h" | |
20 | |
21 #ifndef NULL | |
22 #define NULL 0 | |
23 #endif | |
24 | |
25 extern int errno; | |
26 | |
27 /* | |
28 * XCreateAssocTable - Create an XAssocTable. The size argument should be | |
29 * a power of two for efficiency reasons. Some size suggestions: use 32 | |
30 * buckets per 100 objects; a reasonable maximum number of object per | |
31 * buckets is 8. If there is an error creating the XAssocTable, a NULL | |
32 * pointer is returned. | |
33 */ | |
34 XAssocTable *XCreateAssocTable(size) | |
35 register int size; /* Desired size of the table. */ | |
36 { | |
37 register XAssocTable *table; /* XAssocTable to be initialized. */ | |
38 register XAssoc *buckets; /* Pointer to the first bucket in */ | |
39 /* the bucket array. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25858
diff
changeset
|
40 |
25858 | 41 /* Malloc the XAssocTable. */ |
42 if ((table = (XAssocTable *)malloc(sizeof(XAssocTable))) == NULL) { | |
43 /* malloc call failed! */ | |
44 errno = ENOMEM; | |
45 return(NULL); | |
46 } | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25858
diff
changeset
|
47 |
25858 | 48 /* calloc the buckets (actually just their headers). */ |
49 buckets = (XAssoc *)calloc((unsigned)size, (unsigned)sizeof(XAssoc)); | |
50 if (buckets == NULL) { | |
51 /* calloc call failed! */ | |
52 errno = ENOMEM; | |
53 return(NULL); | |
54 } | |
55 | |
56 /* Insert table data into the XAssocTable structure. */ | |
57 table->buckets = buckets; | |
58 table->size = size; | |
59 | |
60 while (--size >= 0) { | |
61 /* Initialize each bucket. */ | |
62 buckets->prev = buckets; | |
63 buckets->next = buckets; | |
64 buckets++; | |
65 } | |
66 | |
67 return(table); | |
68 } | |
52401 | 69 |
70 /* arch-tag: 5df3237d-ada0-4345-a3ab-282cafb397aa | |
71 (do not change this comment) */ |