* Eliminate some calls to scm_wta.
This commit is contained in:
parent
cc6c7feea4
commit
db4b4ca64f
13 changed files with 77 additions and 39 deletions
|
|
@ -1644,7 +1644,7 @@ SCM_DEFINE (scm_primitive_generic_generic, "primitive-generic-generic", 1, 0, 0,
|
|||
if (gf)
|
||||
return gf;
|
||||
}
|
||||
return scm_wta (subr, (char *) SCM_ARG1, FUNC_NAME);
|
||||
SCM_WRONG_TYPE_ARG (SCM_ARG1, subr);
|
||||
}
|
||||
#undef FUNC_NAME
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue