ssadd

(ssadd [entity [set]])

With no arguments, an empty set; with an entity, a set holding it; with both, adds the entity to the set (if it was not there) and returns the set.

(setq ss (ssadd))
(ssadd (entlast) ss)