diff --git a/src/lib/gensym.pl b/src/lib/gensym.pl index 86e7ad5b..272e68bd 100644 --- a/src/lib/gensym.pl +++ b/src/lib/gensym.pl @@ -28,4 +28,5 @@ gensym(Base, Unique) :- reset_gensym(Base) :- atom_si(Base), - bb_put(Base, 0). + gensym_key(Base, BaseKey), + bb_put(BaseKey, 0).