Lines Matching refs:cdrs
80 ; getcxrs returns the cdrs of ls and their cars
85 (let-values ([(cdrs cars) (getcxrs (cdr ls) who)])
88 (values (cons d cdrs) (cons (car d) cars)))))))
115 (let-values ([(cdrs cars) (getcxrs more who)])
116 (ormap (fx- n 1) ls cdrs cars))))))))])]))
145 (let-values ([(cdrs cars) (getcxrs more who)])
146 (andmap (fx- n 1) ls cdrs cars))))))))])]))
155 ; library map cdrs first to avoid getting sick if f mutates input
161 ; library map cdrs first to avoid getting sick if f mutates input
179 ; library map cdrs first to avoid getting sick if f mutates input
185 ; library map cdrs first to avoid getting sick if f mutates input
221 (let-values ([(cdrs cars) (getcxrs more who)])
222 (for-each (fx- n 1) ls cdrs cars))))))))]))
250 (let-values ([(cdrs cars) (getcxrs more who)])
251 (fold-left cdrls cdrs cars acc)))))))]))
258 ; #3%fold-right naturally does cdrs first to avoid mutation sickness
264 ; #3%fold-right naturally does cdrs first to avoid mutation sickness