- Music * m =unsmob_music (s.music_);
- music_ = m?m->clone ()->self_scm () : SCM_EOL;
- scm_gc_unprotect_object (music_);
-
- for (int i=0; i < s.defs_.size (); i++)
- defs_.push (s.defs_[i]->clone ());
- errorlevel_ = s.errorlevel_;
- if (s.header_)
- {
- header_ = (s.header_) ? new Scheme_hash_table (*s.header_): 0;