#include "output-def.hh"
#include "score.hh"
#include "paper-book.hh"
-#include "ly-module.hh"
LY_DEFINE (ly_make_book, "ly:make-book",
2, 0, 1, (SCM paper, SCM header, SCM scores),
{
LY_ASSERT_SMOB (Book, book, 1);
Book *b = unsmob<Book> (book);
- return b->header_ ? b->header_ : SCM_BOOL_F;
+ return ly_is_module (b->header_) ? b->header_ : SCM_BOOL_F;
}
LY_DEFINE (ly_book_set_header_x, "ly:book-set-header!",
}
-const char Book::type_p_name_[] = "ly:book?";
+const char * const Book::type_p_name_ = "ly:book?";