]> git.donarmstrong.com Git - lilypond.git/blob - lily/page-spacing-result.cc
Merge branch 'master' of ssh+git://hanwen@git.sv.gnu.org/srv/git/lilypond
[lilypond.git] / lily / page-spacing-result.cc
1 /* 
2   page-spacing-result.cc -- implement Page_spacing_result
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 2007 Han-Wen Nienhuys <hanwen@lilypond.org>
7   
8 */
9
10 #include "page-spacing-result.hh"
11
12 Page_spacing_result::Page_spacing_result ()
13 {
14   penalty_ = 0;
15   demerits_ = infinity_f;
16 }
17
18 vsize
19 Page_spacing_result::system_count () const
20 {
21   vsize total = 0;
22   for (vsize i = 0; i < systems_per_page_.size(); i++)
23     total += systems_per_page_[i];
24
25   return total;      
26 }