- scm_tc16_keyword = scm_make_smob_type_mfpe ("keyword", 0,
- scm_markcdr, NULL, prin_keyword, NULL);
-
-#if (SCM_DEBUG_DEPRECATED == 0)
-
- scm_tc16_kw = scm_tc16_keyword;
-
-#endif /* SCM_DEBUG_DEPRECATED == 0 */
+ scm_tc16_keyword = scm_make_smob_type ("keyword", 0);
+ scm_set_smob_mark (scm_tc16_keyword, scm_markcdr);
+ scm_set_smob_print (scm_tc16_keyword, keyword_print);