- scm_gc_mark (sc->header_);
- for (vsize i = sc->defs_.size (); i--;)
- scm_gc_mark (sc->defs_[i]->self_scm ());
-
- scm_gc_mark (sc->input_location_);
- return sc->music_;
-}
-
-int
-Score::print_smob (SCM, SCM p, scm_print_state *)
-{
- scm_puts ("#<Score>", p);
-
- return 1;