Revision 24c6f3345aa396bfad69b2fe7f221c7fd944de10 authored by pahihu on 19 January 2020, 09:24:43 UTC, committed by pahihu on 19 January 2020, 09:24:43 UTC
1 parent 7efa985
Raw File
gensym
;;; -*- logo -*-

to gensym
if not namep "gensym.number [make "gensym.number 0]
make "gensym.number :gensym.number + 1
output word "g :gensym.number
end

bury [[gensym] [gensym.number]]
back to top