X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fstem-tremolo.cc;h=445926bbada1b74a830845eda03a471f0c048389;hb=1753b1a73742a5b0893037116bb6f2febba277f3;hp=dba612fc70e295df81104bcde2b90564dac14a63;hpb=5320f6d196dd67186178adcb6e5debdbbec8aee8;p=lilypond.git diff --git a/lily/stem-tremolo.cc b/lily/stem-tremolo.cc index dba612fc70..445926bbad 100644 --- a/lily/stem-tremolo.cc +++ b/lily/stem-tremolo.cc @@ -66,7 +66,7 @@ Stem_tremolo::raw_molecule (Grob *me) { Real dy = 0; SCM s = beam->get_grob_property ("positions"); - if (ly_number_pair_p (s)) + if (is_number_pair (s)) { dy = -gh_scm2double (gh_car (s)) +gh_scm2double (gh_cdr (s)); }