source file of the GNU LilyPond music typesetter
- (c) 2004 Jan Nieuwenhuizen <janneke@gnu.org>
+ (c) 2004--2007 Jan Nieuwenhuizen <janneke@gnu.org>
*/
#ifndef PAPER_BOOK_HH
#define PAPER_BOOK_HH
-#include "lily-guile.hh"
-#include "parray.hh"
-#include "protected-scm.hh"
+#include "std-vector.hh"
#include "smobs.hh"
+#include "lily-proto.hh"
-struct Score_lines
-{
- SCM lines_;
- SCM header_;
- SCM global_header_;
- Paper_def *paper_;
-
- Score_lines () ;
- void gc_mark ();
- SCM scopes ();
-};
+/** Paper_book collects headers, systems (Paper_system) and texts, and
+ exports them to the output backend, either as systems or as
+ completely formatted pages. */
class Paper_book
{
- DECLARE_SMOBS (Paper_book, );
+ DECLARE_SMOBS (Paper_book);
+
+ SCM systems_;
+ SCM pages_;
+ SCM performances_;
- Real height_;
- SCM copyright_;
- SCM tagline_;
+ void add_score_title (SCM);
+ SCM get_score_title (SCM);
+
public:
- Array<Score_lines> score_lines_;
- Book_paper_def *bookpaper_;
+ SCM header_;
+ SCM header_0_;
+ SCM scores_;
+ SCM bookparts_;
+ Paper_book *parent_;
+ Output_def *paper_;
Paper_book ();
- SCM lines ();
+ Output_def *top_paper ();
+
+ void add_score (SCM);
+ void add_bookpart (SCM);
+ void add_performance (SCM);
+
+ SCM performances () const;
+ SCM systems ();
SCM pages ();
- SCM scopes (int);
- Stencil title (int);
- void classic_output (String);
- void init ();
- void output (String);
+ SCM get_system_specs ();
+
+
+ Stencil book_title ();
+ Stencil score_title (SCM);
+
+ void classic_output (SCM output_channel);
+ void output (SCM output_channel);
+
+protected:
+ void classic_output_aux (SCM output,
+ int *first_performance_number);
+ void output_aux (SCM output_channel,
+ bool is_last,
+ int *first_page_number,
+ int *first_performance_number);
};
DECLARE_UNSMOB (Paper_book, paper_book)
#endif /* PAPER_BOOK_HH */
-