id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc	difficulty
705	Allowing EVAL to evaluate lists with a procedure in the car	johnwcowan		"The following does not work and is not required by R5RS to work, but I see no reason that it ''shouldn't'' work:

{{{

Version 4.7.4 (rev 09df24b)
windows-cygwin-x86 [ manyargs dload ptables ]
compiled 2011-09-21 on LNGNYCL-FDB00M1 (CYGWIN_NT-5.1)

#;1> (define e (interaction-environment))
#;2> (define x '(cons 1 2))
#;3> (eval x e)
(1 . 2)
#;4> (set-car! x cons)
#;5> x
(#<procedure (cons x281 y282)> 1 2)
#;6> (eval x e)

Error: illegal non-atomic object: #<procedure (cons x281 y282)>

        Call history:

        <syntax>          (eval x e)
        <eval>    (eval x e)
        <syntax>          (#<procedure (cons x281 y282)> 1 2)   <--

}}}"	enhancement	closed	not urgent at all		core libraries	4.7.x	fixed