Use SCM_LISTn instead of scm_listify.

This commit is contained in:
Keisuke Nishida 2001-03-11 09:44:08 +00:00
commit e0c08f17b1
13 changed files with 38 additions and 49 deletions

View file

@ -816,7 +816,7 @@ update_catch_handler (void *ptr, SCM tag, SCM args)
SCM observer = data->observer;
SCM message = scm_makfrom0str ("Observer `~A' signals `~A' error: ~S");
return scm_cons (message, scm_listify (observer, tag, args, SCM_UNDEFINED));
return scm_cons (message, SCM_LIST3 (observer, tag, args));
}