Evaluated proc + {who what} {set ::phrases($who) $what}