63 |
} |
} |
64 |
|
|
65 |
|
|
66 |
|
/* scm_append and scm_append_x don't modify their list argument (only the |
67 |
|
lists within that list in the case of scm_append_x), hence making them |
68 |
|
suitable for direct use for concatentate. */ |
69 |
|
|
70 |
|
SCM_REGISTER_PROC (s_srfi1_concatenate, "concatenate", 1, 0, 0, scm_append); |
71 |
|
SCM_REGISTER_PROC (s_srfi1_concatenate_x, "concatenate!", 1, 0, 0, scm_append_x); |
72 |
|
|
73 |
|
|
74 |
SCM_DEFINE (scm_srfi1_delete, "delete", 2, 1, 0, |
SCM_DEFINE (scm_srfi1_delete, "delete", 2, 1, 0, |
75 |
(SCM x, SCM lst, SCM pred), |
(SCM x, SCM lst, SCM pred), |
76 |
"Return a list containing the elements of @var{lst} but with\n" |
"Return a list containing the elements of @var{lst} but with\n" |