Re: byte compiling defcustom

[Stefan Monnier]

> (defcustom stupid (if t (+ 1 1)) "Silly doc.")

> Then do:

> (get 'stupid 'standard-value)

> Which should return:

> ((if t (+ 1 1)))

I don't think it's a relevant example.  Because both (if t (+ 1 1)) and
2 are not only equivalent but they are just as readable.

But indeed (defcustom foo3 (if toto (trul (fr t))) "haha")
turns the expression
into "(byte-code "\205 \301\302\303!!\207" [toto trul fr t] 3)"
which is a lot more problematic.  So clearly, this patch cannot be
installed as is.


        Stefan