]> git.donarmstrong.com Git - lilypond.git/blob - guile18/libguile/list.h
Import guile-1.8 as multiple upstream tarball component
[lilypond.git] / guile18 / libguile / list.h
1 /* classes: h_files */
2
3 #ifndef SCM_LIST_H
4 #define SCM_LIST_H
5
6 /* Copyright (C) 1995,1996,1997,2000,2001,2003,2004,2005,2006
7  * Free Software Foundation, Inc.
8  *
9  * This library is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * This library is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with this library; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22  */
23
24 \f
25
26 #include "libguile/__scm.h"
27
28 \f
29
30 SCM_API SCM scm_list_1 (SCM e1);
31 SCM_API SCM scm_list_2 (SCM e1, SCM e2);
32 SCM_API SCM scm_list_3 (SCM e1, SCM e2, SCM e3);
33 SCM_API SCM scm_list_4 (SCM e1, SCM e2, SCM e3, SCM e4);
34 SCM_API SCM scm_list_5 (SCM e1, SCM e2, SCM e3, SCM e4, SCM e5);
35 SCM_API SCM scm_list_n (SCM elt, ...);
36 SCM_API SCM scm_list (SCM objs);
37 SCM_API SCM scm_list_head (SCM lst, SCM k);
38 SCM_API SCM scm_make_list (SCM n, SCM init);
39 SCM_API SCM scm_cons_star (SCM arg, SCM objs);
40 SCM_API SCM scm_null_p (SCM x);
41 SCM_API SCM scm_list_p (SCM x);
42 SCM_API long scm_ilength (SCM sx);
43 SCM_API SCM scm_length (SCM x);
44 SCM_API SCM scm_append (SCM args);
45 SCM_API SCM scm_append_x (SCM args);
46 SCM_API SCM scm_reverse (SCM lst);
47 SCM_API SCM scm_reverse_x (SCM lst, SCM newtail);
48 SCM_API SCM scm_list_ref (SCM lst, SCM k);
49 SCM_API SCM scm_list_set_x (SCM lst, SCM k, SCM val);
50 SCM_API SCM scm_list_cdr_set_x (SCM lst, SCM k, SCM val);
51 SCM_API SCM scm_last_pair (SCM sx);
52 SCM_API SCM scm_list_tail (SCM lst, SCM k);
53 SCM_API SCM scm_c_memq (SCM x, SCM lst);
54 SCM_API SCM scm_memq (SCM x, SCM lst);
55 SCM_API SCM scm_memv (SCM x, SCM lst);
56 SCM_API SCM scm_member (SCM x, SCM lst);
57 SCM_API SCM scm_delq_x (SCM item, SCM lst);
58 SCM_API SCM scm_delv_x (SCM item, SCM lst);
59 SCM_API SCM scm_delete_x (SCM item, SCM lst);
60 SCM_API SCM scm_list_copy (SCM lst);
61 SCM_API SCM scm_delq (SCM item, SCM lst);
62 SCM_API SCM scm_delv (SCM item, SCM lst);
63 SCM_API SCM scm_delete (SCM item, SCM lst);
64 SCM_API SCM scm_delq1_x (SCM item, SCM lst);
65 SCM_API SCM scm_delv1_x (SCM item, SCM lst);
66 SCM_API SCM scm_delete1_x (SCM item, SCM lst);
67 SCM_API SCM scm_filter (SCM pred, SCM list);
68 SCM_API SCM scm_filter_x (SCM pred, SCM list);
69
70 \f
71
72 /* Guile internal functions */
73
74 SCM_API SCM scm_i_finite_list_copy (SCM /* a list known to be finite */);
75 SCM_API void scm_init_list (void);
76
77 #endif  /* SCM_LIST_H */
78
79 /*
80   Local Variables:
81   c-file-style: "gnu"
82   End:
83 */