- scm_c_define_gsubr ("make-vertex3d", 4, 0, 0, (scm_t_subr)make_vertex3d);
- scm_c_define_gsubr ("vertex3d-position", 1, 0, 0, (scm_t_subr)vertex3d_position);
- scm_c_export ("make-vertex3d", "vertex3d-position", NULL);
+ DEFINE_GSUBR ("make-vertex3d", 4, 0, 0, make_vertex3d);
+ DEFINE_GSUBR ("vertex3d-position", 1, 0, 0, vertex3d_position);