let feed ~string e = Feed (string, e)