* Don't use SCM_LISTn any more.

This commit is contained in:
Dirk Herrmann 2001-06-30 19:28:26 +00:00
commit 5b2a7b5906
2 changed files with 7 additions and 2 deletions

View file

@ -1,3 +1,8 @@
2001-06-30 Dirk Herrmann <D.Herrmann@tu-bs.de>
* readline.c (completion_function): Use scm_list_n instead of
SCM_LISTn.
2001-06-14 Marius Vollmer <mvo@zagadka.ping.de>
* readline.c, readline.h: Replace "scm_*_t" with "scm_t_*".

View file

@ -410,7 +410,7 @@ completion_function (char *text, int continuep)
{
SCM t = scm_makfrom0str (text);
SCM c = continuep ? SCM_BOOL_T : SCM_BOOL_F;
res = scm_apply (compfunc, SCM_LIST2 (t, c), SCM_EOL);
res = scm_apply (compfunc, scm_list_2 (t, c), SCM_EOL);
if (SCM_FALSEP (res))
return NULL;
@ -418,7 +418,7 @@ completion_function (char *text, int continuep)
if (!SCM_STRINGP (res))
scm_misc_error (s_scm_readline,
"Completion function returned bogus value: %S",
SCM_LIST1 (res));
scm_list_1 (res));
SCM_STRING_COERCE_0TERMINATION_X (res);
return strdup (SCM_STRING_CHARS (res));
}