deeds dirty dirt cheap done

TorgoX on 2004-09-02T23:45:13

Dear Log,

I'm up to no-good, in PostScript:

/gensym {   %%  -, string
  7 string dup
  /gensym_Counter ++
  exch cvs 0 (g) putinterval cvn } def

/gensym_Counter 1000000 def

/++ {   %% symbolname, newval
  dup dup load 1 add def load
} bind def