mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-14 23:50:19 +02:00
* list.h (SCM_LISTn): New macros. Make list creation in C code
prettier. The idea comes from STk. * sequences.h, sequences.c, append.h, append.c: Removed. These files implemented non-R4RS operations which would encourage non-portable programming style and less easy-to-read code. * Makefile.am (sequences.h, sequences.c, append.h, append.c): Removed. * libguile.h, eval.c, init.c, stime.c, unif.c: Removed #include sequences.h, #include append.h. * gh.h, gh_list.c: Renamed gh_list_length --> gh_length. * list.h, list.c: Renamed scm_list_length --> scm_length, scm
This commit is contained in:
parent
e69807f074
commit
92396c0aa1
9 changed files with 84 additions and 32 deletions
|
@ -46,7 +46,6 @@
|
|||
#include "eval.h"
|
||||
#include "genio.h"
|
||||
#include "smob.h"
|
||||
#include "sequences.h"
|
||||
#include "strop.h"
|
||||
#include "feature.h"
|
||||
|
||||
|
@ -725,7 +724,7 @@ scm_make_shared_array (oldra, mapfunc, dims)
|
|||
return ra;
|
||||
}
|
||||
}
|
||||
imap = scm_apply (mapfunc, scm_list_reverse (inds), SCM_EOL);
|
||||
imap = scm_apply (mapfunc, scm_reverse (inds), SCM_EOL);
|
||||
if (SCM_ARRAYP (oldra))
|
||||
i = (scm_sizet) scm_aind (oldra, imap, s_make_shared_array);
|
||||
else
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue