Rietveld Code Review Tool
Help | Bug tracker | Discussion group | Source code | Sign in
(621)

Delta Between Two Patch Sets: lily/engraver-scheme.cc

Issue 1914043: Adds announce-end-grob to engraver-scheme.cc (Closed)
Left Patch Set: Created 14 years, 9 months ago
Right Patch Set: Indentation, clarity, and type testing fix Created 14 years, 9 months ago
Left:
Right:
Use n/p to move between diff chunks; N/P to move between comments. Please Sign in to add in-line comments.
Jump to:
Left: Side by side diff | Download
Right: Side by side diff | Download
« no previous file with change/comment | « no previous file | no next file » | no next file with change/comment »
Toggle Intra-line Diffs ('i') | Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
LEFTRIGHT
1 /* 1 /*
2 This file is part of LilyPond, the GNU music typesetter. 2 This file is part of LilyPond, the GNU music typesetter.
3 3
4 Copyright (C) 1997--2010 Han-Wen Nienhuys <hanwen@xs4all.nl> 4 Copyright (C) 1997--2010 Han-Wen Nienhuys <hanwen@xs4all.nl>
5 5
6 LilyPond is free software: you can redistribute it and/or modify 6 LilyPond is free software: you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by 7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation, either version 3 of the License, or 8 the Free Software Foundation, either version 3 of the License, or
9 (at your option) any later version. 9 (at your option) any later version.
10 10
11 LilyPond is distributed in the hope that it will be useful, 11 LilyPond is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of 12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details. 14 GNU General Public License for more details.
15 15
16 You should have received a copy of the GNU General Public License 16 You should have received a copy of the GNU General Public License
17 along with LilyPond. If not, see <http://www.gnu.org/licenses/>. 17 along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
18 */ 18 */
19 19
20 #include "engraver.hh" 20 #include "engraver.hh"
21 #include "grob.hh" 21 #include "grob.hh"
22 22
23 LY_DEFINE (ly_engraver_make_grob, "ly:engraver-make-grob", 23 LY_DEFINE (ly_engraver_make_grob, "ly:engraver-make-grob",
24 3, 0, 0, (SCM engraver, SCM grob_name, SCM cause), 24 3, 0, 0, (SCM engraver, SCM grob_name, SCM cause),
25 » "Creates a grob originating from given engraver instance, " 25 » "Creates a grob originating from given engraver instance,"
26 » "with give @code{grob_name}, a symbol. " 26 » " with give @code{grob-name}, a symbol. @code{cause}"
27 » "@code{cause} should either be another grob " 27 » " should either be another grob or a music event.")
28 » "or a music event.")
29 { 28 {
30 LY_ASSERT_TYPE (unsmob_engraver, engraver, 1); 29 LY_ASSERT_TYPE (unsmob_engraver, engraver, 1);
31 LY_ASSERT_TYPE (ly_is_symbol, grob_name, 2); 30 LY_ASSERT_TYPE (ly_is_symbol, grob_name, 2);
32 LY_ASSERT_TYPE (ly_is_grob_cause, cause, 3); 31 LY_ASSERT_TYPE (ly_is_grob_cause, cause, 3);
33 32
34 Grob *g = unsmob_engraver (engraver)-> 33 Grob *g = unsmob_engraver (engraver)->
35 internal_make_grob(grob_name, cause, 34 internal_make_grob(grob_name, cause,
36 ly_symbol2string (grob_name).c_str (), 35 ly_symbol2string (grob_name).c_str (),
37 "scheme", 0, "scheme"); 36 "scheme", 0, "scheme");
38 return g->self_scm (); 37 return g->self_scm ();
39 } 38 }
40 39
41 LY_DEFINE (ly_engraver_announce_end_grob, "ly:engraver-announce-end-grob", 40 LY_DEFINE (ly_engraver_announce_end_grob, "ly:engraver-announce-end-grob",
42 3, 0, 0, (SCM engraver, SCM grob, SCM cause), 41 3, 0, 0, (SCM engraver, SCM grob, SCM cause),
43 » "Announces an end grob originating from given engraver instance, " 42 » "Announces the end of a grob (i.e., the end of a spanner)"
44 » "with @code{grob} being a grob. " 43 » " originating from given engraver instance, with"
45 » "@code{cause} should either be another grob " 44 » " @code{grob} being a grob. @code{cause} should either"
46 » "or a music event.") 45 » " be another grob or a music event.")
47 { 46 {
lemzwerg 2010/08/02 12:34:25 Please don't use trailing spaces in strings. Inst
MikeSol 2010/08/02 12:40:48 OK. Will do for ly_engraver_announce_end_grob. W
48 LY_ASSERT_TYPE (unsmob_engraver, engraver, 1); 47 LY_ASSERT_TYPE (unsmob_engraver, engraver, 1);
49 LY_ASSERT_TYPE (unsmob_grob, grob, 2); 48 LY_ASSERT_SMOB (Grob, grob, 2);
50 LY_ASSERT_TYPE (ly_is_grob_cause, cause, 3); 49 LY_ASSERT_TYPE (ly_is_grob_cause, cause, 3);
51 50
52 unsmob_engraver (engraver)-> 51 unsmob_engraver (engraver)->
53 announce_end_grob (unsmob_grob (grob), cause); 52 announce_end_grob (unsmob_grob (grob), cause);
54 53
55 return SCM_UNSPECIFIED; 54 return SCM_UNSPECIFIED;
56 } 55 }
LEFTRIGHT
« no previous file | no next file » | Toggle Intra-line Diffs ('i') | Expand Comments ('e') | Collapse Comments ('c') | Toggle Comments ('s')

Powered by Google App Engine
RSS Feeds Recent Issues | This issue
This is Rietveld f62528b