scm_puts (str, p);
Scheme_hash_table *me = unsmob (s);
for (Scm_stl_map::const_iterator i = me->begin (); i != me->end (); i++)
scm_puts (str, p);
Scheme_hash_table *me = unsmob (s);
for (Scm_stl_map::const_iterator i = me->begin (); i != me->end (); i++)