X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fcontext-property.cc;h=11d03c5b0537be35619f173d382fb6cc59aa042b;hb=a5ff05c9c855fef9721ce218cde18249610fb88f;hp=f4f5f07b5cba92e5a2cde81a637c3f9ea0e0513c;hpb=f875ef39c544bd3499dae5360e9e24f69933575f;p=lilypond.git diff --git a/lily/context-property.cc b/lily/context-property.cc index f4f5f07b5c..11d03c5b05 100644 --- a/lily/context-property.cc +++ b/lily/context-property.cc @@ -1,7 +1,7 @@ /* This file is part of LilyPond, the GNU music typesetter. - Copyright (C) 2004--2011 Han-Wen Nienhuys + Copyright (C) 2004--2012 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 @@ -116,13 +116,14 @@ execute_override_property (Context *context, bool ok = true; bool pc = is_unpure_pure_container (new_value); SCM vals[] = {pc ? unpure_pure_container_unpure_part (new_value) : new_value, - pc ? unpure_pure_container_pure_part (new_value) : SCM_BOOL_F}; + pc ? unpure_pure_container_pure_part (new_value) : SCM_BOOL_F + }; for (int i = 0; i < 2; i++) if (!ly_is_procedure (vals[i]) && !is_simple_closure (vals[i])) ok = ok && type_check_assignment (symbol, vals[i], - ly_symbol2scm ("backend-type?")); + ly_symbol2scm ("backend-type?")); /* tack onto alist. We can use set_car, since