X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=lily%2Fbook-scheme.cc;h=1bf602907a68f7a31c520f8411756d31258f0555;hb=92918346012f79ef9109ef0c391947af2d3165ca;hp=5a975041608ca85178fe3302e8ae48021deef014;hpb=8e622ad48c6b9d5d1042a350befe322edf6404c5;p=lilypond.git

diff --git a/lily/book-scheme.cc b/lily/book-scheme.cc
index 5a97504160..1bf602907a 100644
--- a/lily/book-scheme.cc
+++ b/lily/book-scheme.cc
@@ -73,11 +73,10 @@ LY_DEFINE (ly_book_process_to_systems, "ly:book-process-to-systems",
 	   "a string (for file based outputs) or a socket (for network based "
 	   "output).")
 {
-  Book *book = unsmob_book (book_smob);
+  LY_ASSERT_FIRST_SMOB (Book, book_smob);
+
+  Book *book = unsmob_book (book_smob); 
 
-  LY_FUNC_NOTE_FIRST_ARG(book_smob);
-  
-  LY_ASSERT_SMOB(Book,1);
   LY_ASSERT_SMOB(Output_def, 2);
   LY_ASSERT_SMOB(Output_def, 3);