]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/dot-column.cc
Add comment for Lily_lexer::set_identifier.
[lilypond.git] / lily / dot-column.cc
index 91c5f657c3bae6e542a59f5a4fa7cc6dc3c4c155..cfbb92895ccdae58c2ac1be55f00b981f0a0f767 100644 (file)
@@ -1,9 +1,20 @@
 /*
-  dot-column.cc -- implement Dot_column
+  This file is part of LilyPond, the GNU music typesetter.
 
-  source file of the GNU LilyPond music typesetter
+  Copyright (C) 1997--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
 
-  (c) 1997--2008 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  LilyPond is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation, either version 3 of the License, or
+  (at your option) any later version.
+
+  LilyPond is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #include "dot-column.hh"
@@ -99,12 +110,17 @@ Dot_column::calc_positioning_done (SCM smob)
          y.add_point (y1);
          y.add_point (y2);
        }
+      else if (Note_head::has_interface (s))
+       y = Interval (-1, 1);
       else
-       y = s->extent (s, Y_AXIS);
+       {
+         programming_error ("unknown grob in dot col support");
+         continue;
+       }
 
       y *= 2 / ss;
       y += Staff_symbol_referencer::get_position (s);
-         
+
       Box b (s->extent (commonx, X_AXIS), y);
       boxes.push_back (b);
 
@@ -122,7 +138,7 @@ Dot_column::calc_positioning_done (SCM smob)
          Interval y = flag.extent (Y_AXIS)
            * (2 / ss)
            + Stem::stem_end_position (stem);
-                 
+
          Interval x = stem->relative_coordinate (commonx, X_AXIS)
            + flag.extent (X_AXIS);