2 grob-pitch-tuple.cc -- implement Grob_pitch_tuple
4 source file of the GNU LilyPond music typesetter
6 (c) 2001--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
9 #include "grob-pitch-tuple.hh"
11 #include "musical-request.hh"
14 int compare (Grob_pitch_tuple
const &a
, Grob_pitch_tuple
const &b
)
16 return Grob_pitch_tuple::time_compare (a
,b
);
22 Grob_pitch_tuple::Grob_pitch_tuple ()
28 Grob_pitch_tuple::Grob_pitch_tuple (Grob
*h
, Melodic_req
*m
, Moment mom
)
31 pitch_
= *unsmob_pitch (m
->get_mus_property ("pitch"));
36 signed compare, should use pitch<?
39 Grob_pitch_tuple::pitch_compare (Grob_pitch_tuple
const &h1
,
40 Grob_pitch_tuple
const &h2
)
42 return Pitch::compare (h1
.pitch_
, h2
.pitch_
);
46 Grob_pitch_tuple::time_compare (Grob_pitch_tuple
const&h1
,
47 Grob_pitch_tuple
const &h2
)
49 return Moment::compare(h1
.end_
, h2
.end_
);