map -package:base-prelude -is:exact is:exact -package:bytestring -package:dlist package:foldl

Fold pairs into a map.