Opened 7 months ago
Closed 7 months ago
#1834 closed defect (invalid)
Append-map sideeffects
Reported by: | Idiomdrottning | Owned by: | |
---|---|---|---|
Priority: | critical | Milestone: | someday |
Component: | extensions | Version: | 5.3.0 |
Keywords: | srfi-1 | Cc: | |
Estimated difficulty: |
Description
(require-extension srfi-1)
(define (pz lis)
(append-map
(lambda (x) (map (lambda (y)
(print y)
(cons x y))
(pz (remove (lambda (y) (eq? y x)) lis))))
lis))
(pz '(a b c d))
;; this is on 5.3.0.
;; prints nothing. But if it's map instead of append-map, it prints stuff.
Note: See
TracTickets for help on using
tickets.
Pebcak as per ushe.