intern vs. make-symbol

intern vs. make-symbol

[Thorsten Jolitz]

Hi List, 

assume org-babel-load-languages is similar to:

,-------------------------------
| ((emacs-lisp . t) (python . t))
`-------------------------------

Shouldn't this 

,------------------------------------------------------
| (assq (intern "emacs-lisp") org-babel-load-languages)
| (emacs-lisp . t)
`------------------------------------------------------

and this

,--------------------------------------------------
| (assq (eval `(quote ,(make-symbol "emacs-lisp")))
|       org-babel-load-languages)
| nil
`--------------------------------------------------

give the same results - and why isn't this so?

-- 
cheers,
Thorsten

Re: intern vs. make-symbol

[Stefan Monnier]

> give the same results - and why isn't this so?

Because the implicit "interning" is done while `read'ing the code
(i.e. while turning the text into a sexp), not while `eval'ing the code
(which takes a sexp and runs it).


        Stefan

Re: intern vs. make-symbol

[Thorsten Jolitz]

Stefan Monnier <monnier@iro.umontreal.ca> writes:

>> give the same results - and why isn't this so?
>
> Because the implicit "interning" is done while `read'ing the code
> (i.e. while turning the text into a sexp), not while `eval'ing the code
> (which takes a sexp and runs it).

Thanks Tom and Stefan, I think its this implicit "interning" that I
somehow expected to happen when quoting the result of 'make-symbol. 

-- 
cheers,
Thorsten

Re: intern vs. make-symbol

[tom.capey]

On Sunday, February 10, 2013 7:42:01 PM UTC, Thorsten Jolitz wrote:
> Hi List,

> assume org-babel-load-languages is similar to:

> ,-------------------------------
>
> | ((emacs-lisp . t) (python . t))
>
> `-------------------------------

> Shouldn't this

> ,------------------------------------------------------
>
> | (assq (intern "emacs-lisp") org-babel-load-languages)
>
> | (emacs-lisp . t)
>
> `------------------------------------------------------

> and this

> ,--------------------------------------------------
>
> | (assq (eval `(quote ,(make-symbol "emacs-lisp")))
>
> |       org-babel-load-languages)
>
> | nil
>
> `--------------------------------------------------

> give the same results - and why isn't this so?


  They do different things.  Try these:

(eql (make-symbol "emacs-lisp")
     (make-symbol "emacs-lisp"))

=> nil

(eql (intern "emacs-lisp")
     (intern "emacs-lisp"))

=> t

`make-symbol' "[r]eturn[s] a newly allocated uninterned symbol whose name is NAME.
Its value and function definition are void, and its property list is nil."

`intern' "[r]eturn[s] the canonical symbol whose name is STRING.
If there is none, one is created by this function and returned.
A second optional argument specifies the obarray to use;
it defaults to the value of `obarray'."

/Tom
--