| /dports/editors/texmacs/TeXmacs-1.99.4-src/src/Scheme/Tiny/ |
| H A D | tinyscheme_tm.hpp | 68 inline scm scm_cddr (scm obj) { return scm_cdr (scm_cdr (obj)); } in scm_cddr()
115 scm a1 = (scm_car(args)); args = scm_cdr (args); in proc()
121 scm a1 = (scm_car(args)); args = scm_cdr (args); in proc()
122 scm a2 = (scm_car(args)); args = scm_cdr (args); in proc()
128 scm a1 = (scm_car(args)); args = scm_cdr (args); in proc()
129 scm a2 = (scm_car(args)); args = scm_cdr (args); in proc()
130 scm a3 = (scm_car(args)); args = scm_cdr (args); in proc()
136 scm a1 = (scm_car(args)); args = scm_cdr (args); in proc()
137 scm a2 = (scm_car(args)); args = scm_cdr (args); in proc()
138 scm a3 = (scm_car(args)); args = scm_cdr (args); in proc()
[all …]
|
| /dports/print/lilypond-devel/lilypond-2.23.5/lily/ |
| H A D | nested-property.cc | 30 SCM n = scm_cdr (lst); in fast_reverse_x()
93 *alist = scm_cdr (p); in assq_pop_x()
145 SCM rest = scm_cdr (prop_path); in nested_property_alist()
212 nalist = scm_cdr (nalist); in nalist_to_alist()
220 elt = scm_cdr (elt); in nalist_to_alist()
239 SCM value = scm_cdr (elt); in nalist_to_alist()
240 for (SCM pp = scm_cdr (pair); scm_is_pair (pp); pp = scm_cdr (pp)) in nalist_to_alist()
258 value = scm_cdr (elt); in nalist_to_alist()
260 for (SCM pp = scm_cdr (pair); scm_is_pair (pp); pp = scm_cdr (pp)) in nalist_to_alist()
289 SCM value = scm_cdr (elt);
[all …]
|
| H A D | stencil-integral.cc | 120 expr = scm_cdr (expr); in add_draw_line_segments()
122 expr = scm_cdr (expr); in add_draw_line_segments()
124 expr = scm_cdr (expr); in add_draw_line_segments()
126 expr = scm_cdr (expr); in add_draw_line_segments()
140 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
142 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
145 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
147 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
149 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
151 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
[all …]
|
| H A D | music-function.cc | 86 SCM signature = scm_cdr (get_signature ()); in call()
105 val = scm_is_pair (val) ? scm_cdr (val) : SCM_BOOL_F; in call()
122 rest = scm_cdr (rest); in call()
127 args = scm_cons (with_loc (scm_cdr (pred), location), args); in call()
128 signature = scm_cdr (signature); in call()
137 signature = scm_cdr (signature); in call()
139 rest = scm_cdr (rest); in call()
148 for (; scm_is_pair (signature); signature = scm_cdr (signature)) in call()
154 args = scm_cons (with_loc (scm_cdr (pred), location), args); in call()
|
| H A D | dispatcher.cc | 121 for (SCM cl = class_list; scm_is_pair (cl); cl = scm_cdr (cl)) in dispatch()
160 SCM next = scm_cdr (lists[0].list); in dispatch()
174 for (; scm_is_pair (cl); cl = scm_cdr (cl)) in is_listened_class()
222 SCM list = scm_cdr (handle); in internal_add_listener()
235 for (SCM disp = dispatchers_; scm_is_pair (disp); disp = scm_cdr (disp)) in internal_add_listener()
260 SCM list = scm_cdr (handle); in remove_listener()
266 while (scm_is_pair (scm_cdr (e))) in remove_listener()
274 e = scm_cdr (e); in remove_listener()
275 list = scm_cdr (dummy); in remove_listener()
312 for (SCM cl = listen_classes_; scm_is_pair (cl); cl = scm_cdr (cl)) in register_as_listener()
[all …]
|
| H A D | context-property.cc | 211 SCM rest = scm_cdr (grob_property_path); in push()
249 props_->alist_ = scm_cons (cell, scm_cdr (props_->alist_)); in temporary_override()
271 if (scm_is_pair (scm_cdr (grob_property_path))) in temporary_revert()
287 scm_cons (cell, scm_cdr (tail))); in temporary_revert()
300 for (SCM p = current_alist; !scm_is_eq (p, daddy); p = scm_cdr (p)) in matched_pop()
308 cell = scm_cdr (cell); in matched_pop()
343 if (scm_is_pair (scm_cdr (grob_property_path))) in pop()
383 for (SCM s = pre_init_ops; scm_is_pair (s); s = scm_cdr (s)) in apply_property_operations()
387 entry = scm_cdr (entry); in apply_property_operations()
399 SCM grob_prop_path = scm_cdr (entry); in apply_property_operations()
[all …]
|
| H A D | paper-book.cc | 210 for (SCM s = lists[i]; scm_is_pair (s); s = scm_cdr (s)) in all_formats()
248 for (SCM s = pages (); scm_is_pair (s); s = scm_cdr (s)) in output()
329 for (SCM s = systems (); scm_is_pair (s); s = scm_cdr (s)) in dump_signatures()
731 sys = scm_cdr (sys)) in systems()
737 for (SCM s = specs; scm_is_pair (s); s = scm_cdr (s)) in systems()
743 scm_is_pair (t); t = scm_cdr (t)) in systems()
755 for (SCM s = systems_; scm_is_pair (s); s = scm_cdr (s)) in systems()
766 if (scm_is_pair (scm_cdr (s))) in systems()
794 pg = scm_cdr (pg)) in pages()
819 for (SCM p = pages_; scm_is_pair (p); p = scm_cdr (p)) in pages()
[all …]
|
| H A D | lily-guile.cc | 158 return (d == LEFT) ? scm_car (s) : scm_cdr (s); in index_get_cell()
175 && scm_is_number (scm_car (p)) && scm_is_number (scm_cdr (p)); in is_number_pair()
198 for (SCM p = alist; scm_is_pair (p); p = scm_cdr (p)) in ly_alist_vals()
214 while (i-- > 0 && scm_is_pair (scm_cdr (l))) in robust_list_ref()
215 l = scm_cdr (l); in robust_list_ref()
228 src = scm_cdr (src); in ly_deep_copy()
323 for (; scm_is_pair (s); s = scm_cdr (s)) in display_list()
338 for (; scm_is_pair (l); l = scm_cdr (l)) in ly_memv()
349 for (; scm_is_pair (l); l = scm_cdr (l)) in int_list_to_slice()
413 for (SCM s = alist; scm_is_pair (s); s = scm_cdr (s)) in alist_to_hashq()
[all …]
|
| H A D | prob.cc | 59 for (;; aprop = scm_cdr (aprop), bprop = scm_cdr (bprop)) in equal_p()
65 aprop = scm_cdr (aprop); in equal_p()
69 bprop = scm_cdr (bprop); in equal_p()
166 return scm_cdr (s); in internal_get_property()
169 return scm_is_false (s) ? SCM_EOL : scm_cdr (s); in internal_get_property()
|
| H A D | grob-property.cc | 49 for (SCM s = grob_property_callback_stack; scm_is_pair (s); s = scm_cdr (s)) in print_property_callback_stack()
177 return scm_cdr (handle); in internal_get_property_data()
183 SCM val = scm_cdr (handle); in internal_get_property_data()
191 return scm_is_false (handle) ? SCM_EOL : scm_cdr (handle); in internal_get_property_data()
268 grob_property_callback_stack = scm_cdr (grob_property_callback_stack); in try_callback_on_alist()
327 SCM val = scm_cdr (s); in internal_get_object()
375 scm_cdr (args)); in call_pure_function()
|
| H A D | translator-group.cc | 44 for (SCM p = list; scm_is_pair (p); p = scm_cdr (p)) in translator_each()
66 for (SCM tr_list = simple_trans_list_; scm_is_pair (tr_list); tr_list = scm_cdr (tr_list)) in connect_to_context()
76 for (SCM tr_list = simple_trans_list_; scm_is_pair (tr_list); tr_list = scm_cdr (tr_list)) in disconnect_from_context()
195 s = scm_cdr (s)) in precomputed_recurse_over_translators()
218 s = scm_cdr (s)) in recurse_over_translators()
246 for (SCM s = simple_trans_list_; scm_is_pair (s); s = scm_cdr (s)) in precompute_method_bindings()
|
| /dports/print/lilypond/lilypond-2.22.1/lily/ |
| H A D | nested-property.cc | 30 SCM n = scm_cdr (lst); in fast_reverse_x()
93 *alist = scm_cdr (p); in assq_pop_x()
145 SCM rest = scm_cdr (prop_path); in nested_property_alist()
212 nalist = scm_cdr (nalist); in nalist_to_alist()
220 elt = scm_cdr (elt); in nalist_to_alist()
239 SCM value = scm_cdr (elt); in nalist_to_alist()
240 for (SCM pp = scm_cdr (pair); scm_is_pair (pp); pp = scm_cdr (pp)) in nalist_to_alist()
258 value = scm_cdr (elt); in nalist_to_alist()
260 for (SCM pp = scm_cdr (pair); scm_is_pair (pp); pp = scm_cdr (pp)) in nalist_to_alist()
289 SCM value = scm_cdr (elt);
[all …]
|
| H A D | stencil-integral.cc | 120 expr = scm_cdr (expr); in add_draw_line_segments()
122 expr = scm_cdr (expr); in add_draw_line_segments()
124 expr = scm_cdr (expr); in add_draw_line_segments()
126 expr = scm_cdr (expr); in add_draw_line_segments()
140 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
142 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
145 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
147 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
149 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
151 expr = scm_cdr (expr); in add_partial_ellipse_segments_scm()
[all …]
|
| H A D | music-function.cc | 86 SCM signature = scm_cdr (get_signature ()); in call()
105 val = scm_is_pair (val) ? scm_cdr (val) : SCM_BOOL_F; in call()
122 rest = scm_cdr (rest); in call()
127 args = scm_cons (with_loc (scm_cdr (pred), location), args); in call()
128 signature = scm_cdr (signature); in call()
137 signature = scm_cdr (signature); in call()
139 rest = scm_cdr (rest); in call()
|
| H A D | dispatcher.cc | 105 for (SCM cl = class_list; scm_is_pair (cl); cl = scm_cdr (cl)) in dispatch()
144 SCM next = scm_cdr (lists[0].list); in dispatch()
158 for (; scm_is_pair (cl); cl = scm_cdr (cl)) in is_listened_class()
208 SCM list = scm_cdr (handle); in internal_add_listener()
221 for (SCM disp = dispatchers_; scm_is_pair (disp); disp = scm_cdr (disp)) in internal_add_listener()
246 SCM list = scm_cdr (handle); in remove_listener()
252 while (scm_is_pair (scm_cdr (e))) in remove_listener()
260 e = scm_cdr (e); in remove_listener()
261 list = scm_cdr (dummy); in remove_listener()
298 for (SCM cl = listen_classes_; scm_is_pair (cl); cl = scm_cdr (cl)) in register_as_listener()
[all …]
|
| H A D | context-property.cc | 212 SCM rest = scm_cdr (grob_property_path); in push()
250 props_->alist_ = scm_cons (cell, scm_cdr (props_->alist_)); in temporary_override()
272 if (scm_is_pair (scm_cdr (grob_property_path))) in temporary_revert()
288 scm_cons (cell, scm_cdr (tail))); in temporary_revert()
301 for (SCM p = current_alist; !scm_is_eq (p, daddy); p = scm_cdr (p)) in matched_pop()
309 cell = scm_cdr (cell); in matched_pop()
344 if (scm_is_pair (scm_cdr (grob_property_path))) in pop()
384 for (SCM s = pre_init_ops; scm_is_pair (s); s = scm_cdr (s)) in apply_property_operations()
388 entry = scm_cdr (entry); in apply_property_operations()
400 SCM grob_prop_path = scm_cdr (entry); in apply_property_operations()
[all …]
|
| H A D | lily-guile.cc | 163 return (d == LEFT) ? scm_car (s) : scm_cdr (s); in index_get_cell()
180 && scm_is_number (scm_car (p)) && scm_is_number (scm_cdr (p)); in is_number_pair()
203 for (SCM p = alist; scm_is_pair (p); p = scm_cdr (p)) in ly_alist_vals()
219 while (i-- > 0 && scm_is_pair (scm_cdr (l))) in robust_list_ref()
220 l = scm_cdr (l); in robust_list_ref()
233 src = scm_cdr (src); in ly_deep_copy()
345 for (; scm_is_pair (s); s = scm_cdr (s)) in display_list()
360 for (; scm_is_pair (l); l = scm_cdr (l)) in ly_memv()
371 for (; scm_is_pair (l); l = scm_cdr (l)) in int_list_to_slice()
435 for (SCM s = alist; scm_is_pair (s); s = scm_cdr (s)) in alist_to_hashq()
[all …]
|
| H A D | prob.cc | 59 for (;; aprop = scm_cdr (aprop), bprop = scm_cdr (bprop)) in equal_p()
65 aprop = scm_cdr (aprop); in equal_p()
69 bprop = scm_cdr (bprop); in equal_p()
166 return scm_cdr (s); in internal_get_property()
169 return scm_is_false (s) ? SCM_EOL : scm_cdr (s); in internal_get_property()
|
| H A D | music-sequence.cc | 32 for (SCM s = lst; scm_is_pair (s); s = scm_cdr (s)) in transpose_music_list()
43 for (SCM s = l; scm_is_pair (s); s = scm_cdr (s)) in cumulative_length()
62 for (SCM s = l; scm_is_pair (s); s = scm_cdr (s)) in maximum_length()
131 for (SCM s = l; scm_is_pair (s); s = scm_cdr (s)) in music_list_to_relative()
147 for (SCM s = l; scm_is_pair (s); s = scm_cdr (s)) in compress_music_list()
156 for (SCM s = l; scm_is_pair (s); s = scm_cdr (s)) in minimum_start()
165 for (SCM s = l; scm_is_pair (s); s = scm_cdr (s)) in first_start()
|
| H A D | grob-property.cc | 50 for (SCM s = grob_property_callback_stack; scm_is_pair (s); s = scm_cdr (s)) in print_property_callback_stack()
161 return scm_cdr (handle); in internal_get_property_data()
167 SCM val = scm_cdr (handle); in internal_get_property_data()
175 return scm_is_false (handle) ? SCM_EOL : scm_cdr (handle); in internal_get_property_data()
257 grob_property_callback_stack = scm_cdr (grob_property_callback_stack); in try_callback_on_alist()
317 SCM val = scm_cdr (s); in internal_get_object()
365 scm_cdr (args)); in call_pure_function()
|
| H A D | translator-group.cc | 45 for (SCM p = list; scm_is_pair (p); p = scm_cdr (p)) in translator_each()
67 for (SCM tr_list = simple_trans_list_; scm_is_pair (tr_list); tr_list = scm_cdr (tr_list)) in connect_to_context()
77 for (SCM tr_list = simple_trans_list_; scm_is_pair (tr_list); tr_list = scm_cdr (tr_list)) in disconnect_from_context()
193 s = scm_cdr (s)) in precomputed_recurse_over_translators()
216 s = scm_cdr (s)) in recurse_over_translators()
244 for (SCM s = simple_trans_list_; scm_is_pair (s); s = scm_cdr (s)) in precompute_method_bindings()
|
| /dports/lang/guile2/guile-2.2.7/libguile/ |
| H A D | procprop.c | 146 return scm_cdr (user_props);
154 for (user_props = scm_cdr (user_props);
156 user_props = scm_cdr (user_props))
193 SCM pair = scm_assq (key, scm_cdr (user_props));
195 return scm_cdr (pair);
224 user_props = scm_cdr (user_props);
253 SCM pair = scm_assq (scm_sym_name, scm_cdr (user_props));
255 return scm_cdr (pair);
290 SCM pair = scm_assq (scm_sym_documentation, scm_cdr (user_props));
292 return scm_cdr (pair);
|
| H A D | strorder.c | 66 rest = scm_cdr (rest);
96 rest = scm_cdr (rest);
124 rest = scm_cdr (rest);
152 rest = scm_cdr (rest);
180 rest = scm_cdr (rest);
208 rest = scm_cdr (rest);
237 rest = scm_cdr (rest);
266 rest = scm_cdr (rest);
295 rest = scm_cdr (rest);
324 rest = scm_cdr (rest);
|
| /dports/lang/guile/guile-3.0.7/libguile/ |
| H A D | procprop.c | 153 return scm_cdr (user_props);
161 for (user_props = scm_cdr (user_props);
163 user_props = scm_cdr (user_props))
200 SCM pair = scm_assq (key, scm_cdr (user_props));
202 return scm_cdr (pair);
231 user_props = scm_cdr (user_props);
260 SCM pair = scm_assq (scm_sym_name, scm_cdr (user_props));
262 return scm_cdr (pair);
297 SCM pair = scm_assq (scm_sym_documentation, scm_cdr (user_props));
299 return scm_cdr (pair);
|
| H A D | strorder.c | 72 rest = scm_cdr (rest);
102 rest = scm_cdr (rest);
130 rest = scm_cdr (rest);
158 rest = scm_cdr (rest);
186 rest = scm_cdr (rest);
214 rest = scm_cdr (rest);
243 rest = scm_cdr (rest);
272 rest = scm_cdr (rest);
301 rest = scm_cdr (rest);
330 rest = scm_cdr (rest);
|