- if (Object_key const * sub_key = unsmob_key (scm_car (s)))
- {
- scm_set_car_x (s, dump_key (sub_key));
- }
+ if (Object_key const *sub_key = unsmob_key (scm_car (s)))
+ scm_set_car_x (s, dump_key (sub_key));
else if (Moment *mom = unsmob_moment (scm_car (s)))
{
scm_set_car_x (s,
scm_list_2 (ly_symbol2scm ("unquote"),
else if (Moment *mom = unsmob_moment (scm_car (s)))
{
scm_set_car_x (s,
scm_list_2 (ly_symbol2scm ("unquote"),
serialized_keys_[key] = key;
key_serial_numbers_[key] = next_available_;
SCM retval = key_serial (next_available_);
serialized_keys_[key] = key;
key_serial_numbers_[key] = next_available_;
SCM retval = key_serial (next_available_);
Object_key_dumper::dump_key (Object_key const *key)
{
if (key_serial_numbers_.find (key) != key_serial_numbers_.end ())
Object_key_dumper::dump_key (Object_key const *key)
{
if (key_serial_numbers_.find (key) != key_serial_numbers_.end ())