]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/item-scheme.cc
Run `make grand-replace'.
[lilypond.git] / lily / item-scheme.cc
index 0ebbc2832de9a65663a665e7e39a847a23c3c317..b8fab025280f94b36e55f5c3a23a6f3d922b9605 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2005--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 2005--2008 Han-Wen Nienhuys <hanwen@xs4all.nl>
 
 */
 
@@ -21,10 +21,11 @@ LY_DEFINE (ly_item_p, "ly:item?",
 
 LY_DEFINE (ly_item_break_dir, "ly:item-break-dir",
           1, 0, 0, (SCM it),
-          "The break status dir of item @var{it}. @code{-1} is end of "
-          "line, @code{0} unbroken, and @code{1} begin of line.")
+          "The break status direction of item @var{it}.  @code{-1} means"
+          " end of line, @code{0}@tie{}unbroken, and"
+          " @code{1}@tie{}beginning of line.")
 {
-  Item *me = dynamic_cast<Item *> (unsmob_grob (it));
-  SCM_ASSERT_TYPE (me, it, SCM_ARG1, __FUNCTION__, "Item");
+  LY_ASSERT_TYPE (unsmob_item, it, 1);
+  Item *me = unsmob_item (it);
   return scm_from_int (me->break_status_dir ());
 }