refactor pic_gensym