X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=lily%2Fpointer-group-interface-scheme.cc;h=a111aad58c1d89cfb3fe81b779cb390a1699fe78;hb=2250c3af4ec6c31f65fc79d7d6d23d4ed2ab58a2;hp=d9fe6ebe7c3bd1e11e59ccce0f8bfd307205a1f6;hpb=bb8a0a5387af94dd2702877256334b160575a730;p=lilypond.git diff --git a/lily/pointer-group-interface-scheme.cc b/lily/pointer-group-interface-scheme.cc index d9fe6ebe7c..a111aad58c 100644 --- a/lily/pointer-group-interface-scheme.cc +++ b/lily/pointer-group-interface-scheme.cc @@ -1,7 +1,7 @@ /* This file is part of LilyPond, the GNU music typesetter. - Copyright (C) 2010--2011 Han-Wen Nienhuys + Copyright (C) 2010--2015 Han-Wen Nienhuys LilyPond is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -24,13 +24,13 @@ LY_DEFINE (ly_pointer_group_interface__add_grob, "ly:pointer-group-interface::ad 3, 0, 0, (SCM grob, SCM sym, SCM grob_element), "Add @var{grob-element} to @var{grob}'s @var{sym} grob array.") { - LY_ASSERT_TYPE (unsmob_grob, grob, 1); + LY_ASSERT_SMOB (Grob, grob, 1); LY_ASSERT_TYPE (ly_is_symbol, sym, 2); - LY_ASSERT_TYPE (unsmob_grob, grob_element, 3); + LY_ASSERT_SMOB (Grob, grob_element, 3); - Pointer_group_interface::add_grob (unsmob_grob (grob), + Pointer_group_interface::add_grob (unsmob (grob), sym, - unsmob_grob (grob_element)); + unsmob (grob_element)); return SCM_UNSPECIFIED; }