-#ifndef NPRINT
- DOUT << "Fold = " << fold_b_ << " reps: " << repeats_i_;
-
- if (repeat_body_p_)
- repeat_body_p_->print();
-
- if (alternatives_p_)
- alternatives_p_->print();
-#endif
+ Pitch p = *unsmob_pitch (pitch);
+ Music *me = unsmob_music (music);
+ if (lily_1_8_relative)
+ {
+ Music *body = unsmob_music (me->get_property ("element"));
+ if (body)
+ p = body->to_relative_octave (p);
+
+ Pitch last = p;
+ SCM alternatives = me->get_property ("elements");
+
+ for (SCM s = alternatives; scm_is_pair (s); s = scm_cdr (s))
+ {
+ lily_1_8_compatibility_used = true;
+ unsmob_music (scm_car (s))->to_relative_octave (p);
+ }
+
+ return last.smobbed_copy ();
+ }
+ else
+ return me->generic_to_relative_octave (p).smobbed_copy ();