6 /* Copyright (C) 1995,1996,1997,2000,2001,2003,2004,2005,2006,2008,2009
7 * Free Software Foundation, Inc.
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public License
11 * as published by the Free Software Foundation; either version 3 of
12 * the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful, but
15 * 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.
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
27 #include "libguile/__scm.h"
31 SCM_API SCM
scm_list_1 (SCM e1
);
32 SCM_API SCM
scm_list_2 (SCM e1
, SCM e2
);
33 SCM_API SCM
scm_list_3 (SCM e1
, SCM e2
, SCM e3
);
34 SCM_API SCM
scm_list_4 (SCM e1
, SCM e2
, SCM e3
, SCM e4
);
35 SCM_API SCM
scm_list_5 (SCM e1
, SCM e2
, SCM e3
, SCM e4
, SCM e5
);
36 SCM_API SCM
scm_list_n (SCM elt
, ...);
37 SCM_API SCM
scm_list (SCM objs
);
38 SCM_API SCM
scm_list_head (SCM lst
, SCM k
);
39 SCM_API SCM
scm_make_list (SCM n
, SCM init
);
40 SCM_API SCM
scm_cons_star (SCM arg
, SCM objs
);
41 SCM_API SCM
scm_null_p (SCM x
);
42 SCM_API SCM
scm_list_p (SCM x
);
43 SCM_API
long scm_ilength (SCM sx
);
44 SCM_API SCM
scm_length (SCM x
);
45 SCM_API SCM
scm_append (SCM args
);
46 SCM_API SCM
scm_append_x (SCM args
);
47 SCM_API SCM
scm_reverse (SCM lst
);
48 SCM_API SCM
scm_reverse_x (SCM lst
, SCM newtail
);
49 SCM_API SCM
scm_list_ref (SCM lst
, SCM k
);
50 SCM_API SCM
scm_list_set_x (SCM lst
, SCM k
, SCM val
);
51 SCM_API SCM
scm_list_cdr_set_x (SCM lst
, SCM k
, SCM val
);
52 SCM_API SCM
scm_last_pair (SCM sx
);
53 SCM_API SCM
scm_list_tail (SCM lst
, SCM k
);
54 SCM_API SCM
scm_c_memq (SCM x
, SCM lst
);
55 SCM_API SCM
scm_memq (SCM x
, SCM lst
);
56 SCM_API SCM
scm_memv (SCM x
, SCM lst
);
57 SCM_API SCM
scm_member (SCM x
, SCM lst
);
58 SCM_API SCM
scm_delq_x (SCM item
, SCM lst
);
59 SCM_API SCM
scm_delv_x (SCM item
, SCM lst
);
60 SCM_API SCM
scm_delete_x (SCM item
, SCM lst
);
61 SCM_API SCM
scm_list_copy (SCM lst
);
62 SCM_API SCM
scm_delq (SCM item
, SCM lst
);
63 SCM_API SCM
scm_delv (SCM item
, SCM lst
);
64 SCM_API SCM
scm_delete (SCM item
, SCM lst
);
65 SCM_API SCM
scm_delq1_x (SCM item
, SCM lst
);
66 SCM_API SCM
scm_delv1_x (SCM item
, SCM lst
);
67 SCM_API SCM
scm_delete1_x (SCM item
, SCM lst
);
68 SCM_API SCM
scm_filter (SCM pred
, SCM list
);
69 SCM_API SCM
scm_filter_x (SCM pred
, SCM list
);
70 SCM_API SCM
scm_copy_tree (SCM obj
);
74 /* Guile internal functions */
76 SCM_INTERNAL SCM
scm_i_finite_list_copy (SCM
/* a list known to be finite */);
77 SCM_INTERNAL
void scm_init_list (void);
79 #endif /* SCM_LIST_H */