LilyPond is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
LilyPond is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
copy_scm_hashes (SCM dest, SCM src)
{
scm_internal_hash_for_each_handle ((scm_t_hash_handle_fn) ©_handle,
copy_scm_hashes (SCM dest, SCM src)
{
scm_internal_hash_for_each_handle ((scm_t_hash_handle_fn) ©_handle,
SCM handle = scm_hashq_get_handle (hash_tab_, k);
if (scm_is_pair (handle))
SCM handle = scm_hashq_get_handle (hash_tab_, k);
if (scm_is_pair (handle))
}
SCM
Scheme_hash_table::to_alist () const
{
return scm_internal_hash_fold ((scm_t_hash_fold_fn) &collect_handles,
}
SCM
Scheme_hash_table::to_alist () const
{
return scm_internal_hash_fold ((scm_t_hash_fold_fn) &collect_handles,