Hi,

Okay, I'm reasonably sure this is a bug with clojure's eval. Here's an
even more succinct version:

(defn lazy-identity [a]
  (if (seq? a)
    (map lazy-identity a)
    a))

user=> (lazy-identity '(apply + '(1 2 3)))
(apply + (quote (1 2 3)))
user=> (eval (lazy-identity '(apply + '(1 2 3))))
java.lang.ExceptionInInitializerError (NO_SOURCE_FILE:0)
user=> (eval '(apply + '(1 2 3)))
6

Let me know if you need any more information or if there's I'm doing
wrong.

Thanks,
- Jeff

On Feb 19, 11:34 am, Jeffrey Chu <joc...@gmail.com> wrote:
> Hi,
>
> After updating to r1295, I'm hitting an error in swank-clojure I can't
> seem to fix. Here's a micro test:
>
> (ns jochu.micro-test)
>
> (defn deep-replace [smap coll]
>   (map #(if (or (seq? %) (vector? %))
>           (deep-replace smap %)
>           %)
>        (replace smap coll)))
>
> (defn t-to-true [form]
>   (deep-replace {'t true} form))
>
> (defn throw-an-error []
>   (let [form (t-to-true '(apply + '(1 2 3)))]
>     (println form)
>     (eval form)))
>
> (throw-an-error) ;; outputs:
> (apply + (quote (1 2 3)))
> java.lang.ExceptionInInitializerError (NO_SOURCE_FILE:0)
>
> Or is there something else I ought to be changing?
>
> Thanks for any input you can give me,
> - Jeff
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To post to this group, send email to clojure@googlegroups.com
To unsubscribe from this group, send email to 
clojure+unsubscr...@googlegroups.com
For more options, visit this group at 
http://groups.google.com/group/clojure?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to