Use core.match for squashable-pair?