RE: comparing symbols coming from gensym?

[Drew Adams]

    Why is it that
    (setq a (gensym)) ;=> G2007
    a                 ;=> G2007
    (equal a 'G2007)  ;=> nil
    while
    (setq a 'foo)    ;=> foo
    a                ;=> foo
    (equal a 'foo)   ;=> t

Perhaps because gensym, like make-symbol, doesn't intern the symbol it
creates? The reader interns `foo' in (setq a 'foo). So, they are different
symbols: one is interned in obarray; the other is an uninterned symbol.