Mercurial > emacs
annotate oldXMenu/insque.c @ 88170:c8c3cfdd5200
(rmail-nuke-pinhead-header, rmail-reformat-message)
(rmail-msg-restore-non-pruned-header, rmail-msg-prune-header):
Deleted.
(rmail-narrow-to-header): Fix typo, error if we cannot find the
end of the headers.
author | Alex Schroeder <alex@gnu.org> |
---|---|
date | Mon, 16 Jan 2006 22:21:08 +0000 |
parents | d7ddb3e565de |
children |
rev | line source |
---|---|
88155 | 1 /* Copyright (C) 2002, 2003, 2004, 2005 Free Software Foundation, Inc. */ |
2 | |
25858 | 3 /* This file implements the emacs_insque and emacs_remque functions, |
4 copies of the insque and remque functions of BSD. They and all | |
5 their callers have been renamed to emacs_mumble to allow us to | |
6 include this file in the menu library on all systems. */ | |
7 | |
8 | |
9 struct qelem { | |
10 struct qelem *q_forw; | |
11 struct qelem *q_back; | |
12 char q_data[1]; | |
13 }; | |
14 | |
15 /* Insert ELEM into a doubly-linked list, after PREV. */ | |
16 | |
17 void | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25858
diff
changeset
|
18 emacs_insque (elem, prev) |
25858 | 19 struct qelem *elem, *prev; |
20 { | |
21 struct qelem *next = prev->q_forw; | |
22 prev->q_forw = elem; | |
23 if (next) | |
24 next->q_back = elem; | |
25 elem->q_forw = next; | |
26 elem->q_back = prev; | |
27 } | |
28 | |
29 /* Unlink ELEM from the doubly-linked list that it is in. */ | |
30 | |
31 emacs_remque (elem) | |
32 struct qelem *elem; | |
33 { | |
34 struct qelem *next = elem->q_forw; | |
35 struct qelem *prev = elem->q_back; | |
36 if (next) | |
37 next->q_back = prev; | |
38 if (prev) | |
39 prev->q_forw = next; | |
40 } | |
88155 | 41 |
42 /* arch-tag: a8719d1a-5c3f-4bce-b36b-173106d36165 | |
43 (do not change this comment) */ |