Lazier `foldr1Of`. (closes #236)