Re: [Chicken-users] how to unintern a symbol

[Peter Bex]

On Mon, Feb 02, 2015 at 10:51:26AM -0700, Alexej Magura wrote:
> Does Chicken have anything comparable to Common Lisp's /unintern/? I
> thought that it might be under /##sys/, since other features present
> in Common Lisp, but absent in Chicken are available under that
> namespace, but it doesn't seem to be provided by that
> module/namespace.

There's string->uninterned-symbol, which is even documented, right
below "gensym":
http://wiki.call-cc.org/man/4/Unit%20library#string-uninterned-symbol

If you have a symbol you want to unintern, you can get its string
and create an uninterned symbol from that:

(define unintern (o string->uninterned-symbol symbol->string))

(eq? (unintern 'foo) 'foo) => #f

Cheers,
Peter

signature.asc
Description: Digital signature