2 % Test new font selection and scm text markup
10 c-\textscript #'(bold "textb")
12 d-\textscript #'(lines "one" "two" "three")
13 e-\textscript #'(lines (bold "one")
14 (rows "and" "there" "is" ((family . "number") "2"))
16 f-\textscript #'(finger "3")
17 g-\textscript #'(music (named "noteheads-2"))
23 TextScript \push #'font-family = #'roman
24 TextScript \pop #'no-spacing-rods
25 TextScript \push #'direction = #1