;;@ignore ;; Matches a list of patterns against a list. Supports segment variables. (define (p:list . subpatterns) (matcher:make 'single (lambda (datum sofar success)