1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 21:40:33 +02:00

scm_make cleanup

* libguile/goops.c (scm_make): Remove SCM_DEFINE around scm_make; the
  real definition is in Scheme.
This commit is contained in:
Andy Wingo 2015-01-13 21:59:03 +01:00
parent 9c49d475f5
commit cb3ea03dd1

View file

@ -799,15 +799,11 @@ scm_wta_dispatch_n (SCM gf, SCM args, int pos, const char *subr)
SCM_DEFINE (scm_make, "make", 0, 0, 1, SCM
(SCM args), scm_make (SCM args)
"Make a new object. @var{args} must contain the class and\n"
"all necessary initialization information.")
#define FUNC_NAME s_scm_make
{ {
return scm_apply_0 (scm_variable_ref (var_make), args); return scm_apply_0 (scm_variable_ref (var_make), args);
} }
#undef FUNC_NAME