LEFT | RIGHT |
(no file at all) | |
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--2019 Han-Wen Nienhuys <hanwen@xs4all.nl> | 4 Copyright (C) 1997--2019 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 |
(...skipping 47 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
58 Music *mus = unsmob<Music> (scm_car (i)); | 58 Music *mus = unsmob<Music> (scm_car (i)); |
59 | 59 |
60 SCM scm_iter = get_static_get_iterator (mus); | 60 SCM scm_iter = get_static_get_iterator (mus); |
61 Music_iterator *mi = unsmob<Music_iterator> (scm_iter); | 61 Music_iterator *mi = unsmob<Music_iterator> (scm_iter); |
62 | 62 |
63 Context *c = get_outlet (); | 63 Context *c = get_outlet (); |
64 if (j && create_separate_contexts_) | 64 if (j && create_separate_contexts_) |
65 { | 65 { |
66 // create a new context of the same kind with the number as ID | 66 // create a new context of the same kind with the number as ID |
67 SCM name = ly_symbol2scm (c->context_name ().c_str ()); | 67 SCM name = ly_symbol2scm (c->context_name ().c_str ()); |
68 string id = ::to_string (j); | 68 string id = std::to_string (j); |
69 if (Context *other = c->find_create_context (name, id, SCM_EOL)) | 69 if (Context *other = c->find_create_context (name, id, SCM_EOL)) |
70 c = other; | 70 c = other; |
71 else | 71 else |
72 { | 72 { |
73 Input *origin = get_music ()->origin (); | 73 Input *origin = get_music ()->origin (); |
74 origin->warning (_f ("cannot find or create context: %s", | 74 origin->warning (_f ("cannot find or create context: %s", |
75 Context::diagnostic_id (name, id).c_str ())); | 75 Context::diagnostic_id (name, id).c_str ())); |
76 } | 76 } |
77 } | 77 } |
78 | 78 |
(...skipping 94 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
173 } | 173 } |
174 | 174 |
175 void | 175 void |
176 Simultaneous_music_iterator::do_quit () | 176 Simultaneous_music_iterator::do_quit () |
177 { | 177 { |
178 for (SCM s = children_list_; scm_is_pair (s); s = scm_cdr (s)) | 178 for (SCM s = children_list_; scm_is_pair (s); s = scm_cdr (s)) |
179 unsmob<Music_iterator> (scm_car (s))->quit (); | 179 unsmob<Music_iterator> (scm_car (s))->quit (); |
180 } | 180 } |
181 | 181 |
182 IMPLEMENT_CTOR_CALLBACK (Simultaneous_music_iterator); | 182 IMPLEMENT_CTOR_CALLBACK (Simultaneous_music_iterator); |
LEFT | RIGHT |