+ if (!gh_string_p (m) && !gh_number_p (m))
+ m = get_property ("rehearsalMark");
+
+ if (gh_number_p (m))
+ {
+ int mark_count = gh_scm2int (m);
+ t = to_string (mark_count);
+ mark_count ++;
+ m = gh_int2scm (mark_count);
+ }
+ else if (gh_string_p (m))
+ {
+ t = ly_scm2string (m);
+ String next;
+ if (t.length ())
+ {
+ char c = t[0];
+ c++;
+ next = to_string (c);
+ }
+ m = scm_makfrom0str (next.to_str0 ());
+ }
+ else
+ {
+ m = gh_int2scm (1);
+ }
+
+ daddy_trans_->set_property ("rehearsalMark", m);
+
+ text_->set_grob_property ("text",
+ scm_makfrom0str (t.to_str0 ()));
+
+ String style = "mark-number";
+ for (int i=0; i < t.length (); i++)
+ {
+ if (!isdigit (t[i]))
+ {
+ style = "mark-letter";
+ break;
+ }
+ }
+ SCM st = ly_symbol2scm (style.to_str0 ());
+ text_->set_grob_property ("font-style", st);