The gensym* function is similar to the gensym function, however, it will produce a unique symbol that does not currently exist within the CLIPS environment.
Example
CLIPS> (setgen 1) 1 CLIPS> (assert (gen1 gen2 gen3)) <Fact-0> CLIPS> (gensym) gen1 CLIPS> (gensym*) gen4 CLIPS>