replace SCM_ASSERT_TYPE with LY_ASSERT_TYPE and friends

[lilypond.git] / lily / book-scheme.cc

diff --git a/lily/book-scheme.cc b/lily/book-scheme.cc
index 5a975041608ca85178fe3302e8ae48021deef014..1bf602907a68f7a31c520f8411756d31258f0555 100644 (file)
--- 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);