+Molecule
+Time_signature::time_signature (Grob*me,int num, int den)
+{
+ SCM chain = Font_interface::font_alist_chain (me);
+
+ Molecule n = Text_item::text2molecule (me,
+ ly_str02scm (to_str (num).ch_C ()),
+ chain);
+ Molecule d = Text_item::text2molecule (me,
+ ly_str02scm (to_str (den).ch_C ()),
+ chain);
+ n.align_to (X_AXIS, CENTER);
+ d.align_to (X_AXIS, CENTER);
+ Molecule m;
+ if (den)
+ {
+ m.add_at_edge (Y_AXIS, UP, n, 0.0);
+ m.add_at_edge (Y_AXIS, DOWN, d, 0.0);
+ }
+ else
+ {
+ m = n;
+ m.align_to (Y_AXIS, CENTER);
+ }
+ return m;
+}