- SCM_ASSERT_TYPE (scm_is_string (b), b, SCM_ARG2, __FUNCTION__, "string");
- SCM_ASSERT_TYPE (ly_c_list_p (c), c, SCM_ARG3, __FUNCTION__, "list of syms");
- if (!scm_is_vector (all_ifaces))
- all_ifaces = scm_make_vector (scm_int2num (40), SCM_EOL);
-
+ SCM_ASSERT_TYPE (scm_is_string (b), b, SCM_ARG2, __FUNCTION__, "string");
+ SCM_ASSERT_TYPE (ly_is_list (c), c, SCM_ARG3, __FUNCTION__, "list of syms");
+ if (!all_ifaces)
+ {
+ SCM tab = scm_c_make_hash_table (59);
+ all_ifaces = tab;
+ scm_permanent_object (tab);
+ }
+