Hi,
I have some code thus:
-
(define p
(lambda (m state)
(printf m: ~S\nstate: ~S\n\n m state)
(let ((k (car m))
(v (cdr m)))
(case k
((team)
(append `((team/name . ,(alist-ref 'name v eqv? 'sentinel)))
state))
Hi Andy,
The error on 4.9.0rc1 is likely due to 0a52536, which made `assoc`,
`member` et al. signal errors when their second arguments aren't lists
instead of just returning #f (or the sentinel value). This is new
behavior since 4.7.0, and IIRC there were a couple of places in CHICKEN
itself that