| /dports/editors/texmacs/TeXmacs-1.99.4-src/src/Scheme/Tiny/ |
| H A D | tinyscheme_tm.hpp | 65 inline scm scm_caar (scm obj) { return scm_car (scm_car (obj)); } in scm_caar()
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 | stencil-integral.cc | 94 SCM head = scm_car (l); in get_path_list()
505 SCM blot = scm_car (expr); in internal_add_path_segments()
553 SCM fm_scm = scm_car (expr); in add_named_glyph_segments()
556 SCM glyph = scm_car (expr); in add_named_glyph_segments()
585 SCM fm_scm = scm_car (expr); in add_glyph_string_segments()
591 SCM whxy = scm_car (expr); in add_glyph_string_segments()
603 SCM now = scm_car (s); in add_glyph_string_segments()
679 SCM head = scm_car (expr); in interpret_stencil_for_skyline()
726 SCM th = scm_car (expr); in interpret_stencil_for_skyline()
730 SCM x1 = scm_car (expr); in interpret_stencil_for_skyline()
[all …]
|
| H A D | nested-property.cc | 45 p = scm_cons (scm_car (lst), p); in partial_list_copy()
94 return scm_car (p); in assq_pop_x()
120 return scm_acons (scm_car (prop_path), in nested_create_alist()
144 SCM key = scm_car (prop_path); in nested_property_alist()
211 SCM elt = scm_car (nalist); in nalist_to_alist()
213 SCM key = scm_car (elt); in nalist_to_alist()
221 key = scm_car (elt); in nalist_to_alist()
253 SCM pair = scm_car (partials); in nalist_to_alist()
254 SCM key = scm_car (pair); in nalist_to_alist()
280 SCM elt = scm_car (p);
[all …]
|
| H A D | context-property.cc | 44 || !scm_is_symbol (scm_car (grob_property_path))) in general_pushpop_property()
210 SCM symbol = scm_car (grob_property_path); in push()
246 if (scm_is_symbol (scm_car (cell))) in temporary_override()
302 if (scm_is_eq (scm_car (p), cell)) in matched_pop()
304 SCM key = scm_car (cell); in matched_pop()
309 if (scm_is_symbol (scm_car (cell))) in matched_pop()
385 SCM entry = scm_car (s); in apply_property_operations()
386 SCM type = scm_car (entry); in apply_property_operations()
391 SCM context_prop = scm_car (entry); in apply_property_operations()
398 SCM context_prop = scm_car (entry); in apply_property_operations()
[all …]
|
| H A D | music-function.cc | 95 SCM arg = scm_car (rest); in call()
96 SCM pred = scm_car (signature); in call()
104 SCM val = scm_car (get_signature ()); in call()
117 else if (scm_is_false (scm_call_1 (scm_car (pred), arg))) in call()
131 pred = scm_car (signature); in call()
150 SCM pred = scm_car (signature); in call()
162 SCM pred = scm_car (get_signature ()); in call()
168 pred = scm_car (pred); in call()
|
| H A D | stencil-interpret.cc | 31 SCM head = scm_car (expr); in interpret_stencil_expression()
49 interpret_stencil_expression (scm_car (x), sink, o); in interpret_stencil_expression()
63 SCM r = scm_car (color); in interpret_stencil_expression()
91 SCM angle = scm_car (args); in interpret_stencil_expression()
95 SCM x = scm_car (offset); in interpret_stencil_expression()
107 SCM x_scale = scm_car (args); in interpret_stencil_expression()
131 && scm_is_eq (scm_car (expr), ly_symbol2scm ("utf-8-string"))) in interpret_stencil_expression()
|
| H A D | paper-book.cc | 211 if (scm_is_false (scm_member (scm_car (s), formats))) in all_formats()
212 formats = scm_cons (scm_car (s), formats); in all_formats()
402 scm_car (s), separate_formats); in output_stencils()
597 SCM elem = scm_car (s); in get_system_specs()
732 append_scm_list (&systems_tail, scm_car (sys)); in systems()
740 = unsmob<Paper_score> (scm_car (s))) in systems()
748 append_scm_list (&systems_tail, scm_car (s)); in systems()
757 Prob *ps = unsmob<Prob> (scm_car (s)); in systems()
795 append_scm_list (&pages_tail, scm_car (pg)); in pages()
807 scm_call_1 (page_stencil, scm_car (pages)); in pages()
[all …]
|
| H A D | stream-event.cc | 88 SCM entry = scm_car (s); in make_transposable()
89 SCM prop = scm_car (entry); in make_transposable()
115 obj->immutable_property_alist_ = scm_reverse (scm_car (data)); in undump()
129 std::string oc = ly_symbol2string (scm_car (get_property (&old_ev, "class"))); in warn_reassign_event_ptr()
132 std::string nc = ly_symbol2string (scm_car (get_property (new_ev, "class"))); in warn_reassign_event_ptr()
|
| H A D | lily-lexer.cc | 166 ly_use_module (module, scm_car (s)); in add_scope()
181 SCM sc = scm_car (scopes_); in remove_scope()
193 scm_set_current_module (scm_car (scopes_)); in set_current_scope()
214 SCM var = ly_module_lookup (scm_car (s), sym); in lookup_identifier_symbol()
230 scm_module_define (scm_car (scopes_), in start_main_input()
258 sym = scm_car (path); in set_identifier()
270 SCM mod = scm_car (scopes_); in set_identifier()
|
| 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()
183 return Offset (from_scm<Real> (scm_car (s)), from_scm<Real> (scm_cdr (s))); in from_scm()
216 return scm_car (l); in robust_list_ref()
227 res = scm_cons (ly_deep_copy (scm_car (src)), res); in ly_deep_copy()
325 scm_display (scm_car (s), p); in display_list()
339 if (scm_is_true (scm_eqv_p (v, scm_car (l)))) in ly_memv()
350 if (scm_is_number (scm_car (l))) in int_list_to_slice()
351 s.add_point (scm_to_int (scm_car (l))); in int_list_to_slice()
|
| H A D | key-engraver.cc | 98 restore = scm_cons (scm_car (s), restore); in create_key()
179 SCM head = scm_member (scm_car (s), alist); in read_event()
183 accs = scm_cons (scm_car (head), accs); in read_event()
184 alist = scm_delete_x (scm_car (head), alist); in read_event()
195 accs = scm_cons (scm_car (s), accs); in read_event()
|
| /dports/print/lilypond/lilypond-2.22.1/lily/ |
| H A D | stencil-integral.cc | 94 SCM head = scm_car (l); in get_path_list()
496 SCM blot = scm_car (expr); in internal_add_path_segments()
544 SCM fm_scm = scm_car (expr); in add_named_glyph_segments()
547 SCM glyph = scm_car (expr); in add_named_glyph_segments()
576 SCM fm_scm = scm_car (expr); in add_glyph_string_segments()
582 SCM whxy = scm_car (expr); in add_glyph_string_segments()
594 SCM now = scm_car (s); in add_glyph_string_segments()
670 SCM head = scm_car (expr); in interpret_stencil_for_skyline()
717 SCM th = scm_car (expr); in interpret_stencil_for_skyline()
721 SCM x1 = scm_car (expr); in interpret_stencil_for_skyline()
[all …]
|
| H A D | nested-property.cc | 45 p = scm_cons (scm_car (lst), p); in partial_list_copy()
94 return scm_car (p); in assq_pop_x()
120 return scm_acons (scm_car (prop_path), in nested_create_alist()
144 SCM key = scm_car (prop_path); in nested_property_alist()
211 SCM elt = scm_car (nalist); in nalist_to_alist()
213 SCM key = scm_car (elt); in nalist_to_alist()
221 key = scm_car (elt); in nalist_to_alist()
253 SCM pair = scm_car (partials); in nalist_to_alist()
254 SCM key = scm_car (pair); in nalist_to_alist()
280 SCM elt = scm_car (p);
[all …]
|
| H A D | context-property.cc | 44 || !scm_is_symbol (scm_car (grob_property_path))) in general_pushpop_property()
211 SCM symbol = scm_car (grob_property_path); in push()
247 if (scm_is_symbol (scm_car (cell))) in temporary_override()
303 if (scm_is_eq (scm_car (p), cell)) in matched_pop()
305 SCM key = scm_car (cell); in matched_pop()
310 if (scm_is_symbol (scm_car (cell))) in matched_pop()
386 SCM entry = scm_car (s); in apply_property_operations()
387 SCM type = scm_car (entry); in apply_property_operations()
392 SCM context_prop = scm_car (entry); in apply_property_operations()
399 SCM context_prop = scm_car (entry); in apply_property_operations()
[all …]
|
| H A D | music-function.cc | 95 SCM arg = scm_car (rest); in call()
96 SCM pred = scm_car (signature); in call()
104 SCM val = scm_car (get_signature ()); in call()
117 else if (scm_is_false (scm_call_1 (scm_car (pred), arg))) in call()
131 pred = scm_car (signature); in call()
147 SCM pred = scm_car (get_signature ()); in call()
153 pred = scm_car (pred); in call()
|
| H A D | paper-book.cc | 456 if (ly_is_module (scm_car (s))) in get_system_specs()
458 header = scm_car (s); in get_system_specs()
470 set_page_permission (scm_car (system_specs), in get_system_specs()
499 set_labels (scm_car (system_specs), labels); in get_system_specs()
510 else if (Text_interface::is_markup_list (scm_car (s))) in get_system_specs()
519 SCM t = scm_car (list); in get_system_specs()
592 = unsmob<Paper_score> (scm_car (s))) in systems()
601 systems_ = scm_cons (scm_car (s), systems_); in systems()
611 Prob *ps = unsmob<Prob> (scm_car (s)); in systems()
659 scm_call_1 (page_stencil, scm_car (pages)); in pages()
[all …]
|
| H A D | music-sequence.cc | 33 if (Prob *p = unsmob<Prob> (scm_car (s))) in transpose_music_list()
45 Moment l = unsmob<Music> (scm_car (s))->get_length (); in cumulative_length()
64 Music *m = unsmob<Music> (scm_car (s)); in maximum_length()
133 if (Music *m = unsmob<Music> (scm_car (s))) in music_list_to_relative()
148 unsmob<Music> (scm_car (s))->compress (m); in compress_music_list()
157 m = std::min (m, unsmob<Music> (scm_car (s))->start_mom ()); in minimum_start()
167 Music *mus = unsmob<Music> (scm_car (s)); in first_start()
|
| H A D | stencil-interpret.cc | 31 SCM head = scm_car (expr); in interpret_stencil_expression()
49 interpret_stencil_expression (scm_car (x), sink, o); in interpret_stencil_expression()
67 SCM r = scm_car (color); in interpret_stencil_expression()
96 SCM angle = scm_car (args); in interpret_stencil_expression()
100 SCM x = scm_car (offset); in interpret_stencil_expression()
112 SCM x_scale = scm_car (args); in interpret_stencil_expression()
|
| H A D | stream-event.cc | 88 SCM entry = scm_car (s); in make_transposable()
89 SCM prop = scm_car (entry); in make_transposable()
115 obj->immutable_property_alist_ = scm_reverse (scm_car (data)); in undump()
129 std::string oc = ly_symbol2string (scm_car (get_property (&old_ev, "class"))); in warn_reassign_event_ptr()
132 std::string nc = ly_symbol2string (scm_car (get_property (new_ev, "class"))); in warn_reassign_event_ptr()
|
| H A D | book.cc | 73 SCM entry = scm_car (p); in Book()
90 Book *newpart = unsmob<Book> (scm_car (p))->clone (); in Book()
223 if (Score *score = unsmob<Score> (scm_car (s))) in process_score()
230 Music_output *output = unsmob<Music_output> (scm_car (outputs)); in process_score()
260 else if (Text_interface::is_markup_list (scm_car (s)) in process_score()
261 || unsmob<Page_marker> (scm_car (s))) in process_score()
262 output_paper_book->add_score (scm_car (s)); in process_score()
|
| H A D | lily-lexer.cc | 165 ly_use_module (module, scm_car (s)); in add_scope()
179 SCM sc = scm_car (scopes_); in remove_scope()
191 scm_set_current_module (scm_car (scopes_)); in set_current_scope()
212 SCM var = ly_module_lookup (scm_car (s), sym); in lookup_identifier_symbol()
234 scm_module_define (scm_car (scopes_), in start_main_input()
262 sym = scm_car (path); in set_identifier()
274 SCM mod = scm_car (scopes_); in set_identifier()
|
| 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()
188 return Offset (from_scm<Real> (scm_car (s)), from_scm<Real> (scm_cdr (s))); in from_scm()
221 return scm_car (l); in robust_list_ref()
232 res = scm_cons (ly_deep_copy (scm_car (src)), res); in ly_deep_copy()
347 scm_display (scm_car (s), p); in display_list()
361 if (scm_is_true (scm_eqv_p (v, scm_car (l)))) in ly_memv()
372 if (scm_is_number (scm_car (l))) in int_list_to_slice()
373 s.add_point (scm_to_int (scm_car (l))); in int_list_to_slice()
|
| H A D | key-engraver.cc | 98 restore = scm_cons (scm_car (s), restore); in create_key()
179 SCM head = scm_member (scm_car (s), alist); in read_event()
183 accs = scm_cons (scm_car (head), accs); in read_event()
184 alist = scm_delete_x (scm_car (head), alist); in read_event()
195 accs = scm_cons (scm_car (s), accs); in read_event()
|
| /dports/lang/guile2/guile-2.2.7/libguile/ |
| H A D | strorder.c | 65 s2 = scm_car (rest);
95 s2 = scm_car (rest);
123 s2 = scm_car (rest);
151 s2 = scm_car (rest);
179 s2 = scm_car (rest);
207 s2 = scm_car (rest);
236 s2 = scm_car (rest);
265 s2 = scm_car (rest);
294 s2 = scm_car (rest);
323 s2 = scm_car (rest);
|
| /dports/lang/guile/guile-3.0.7/libguile/ |
| H A D | strorder.c | 71 s2 = scm_car (rest);
101 s2 = scm_car (rest);
129 s2 = scm_car (rest);
157 s2 = scm_car (rest);
185 s2 = scm_car (rest);
213 s2 = scm_car (rest);
242 s2 = scm_car (rest);
271 s2 = scm_car (rest);
300 s2 = scm_car (rest);
329 s2 = scm_car (rest);
|