aaa I see! How can I be so naive some times? ;)

Jim



On 21/02/13 14:15, AtKaaZ wrote:
=> (def component? number?)
#'runtime.q/component?

=> (defmacro defcomponent [name co]
    `(do
       (assert (component? ~co) "Not a valid IComponent")
       (def ~name ~co)
       )
    )
#'runtime.q/defcomponent

=> (defcomponent a (str "a"))
AssertionError Assert failed: Not a valid IComponent
(runtime.q/component? (str "a"))  runtime.q/eval6570 (NO_SOURCE_FILE:1)

=> (defcomponent a "a")
AssertionError Assert failed: Not a valid IComponent
(runtime.q/component? "a")  runtime.q/eval6572 (NO_SOURCE_FILE:1)
=> (defcomponent a 1)
#'runtime.q/a

=> (defcomponent a (+ 1 3))
#'runtime.q/a




On Thu, Feb 21, 2013 at 3:11 PM, AtKaaZ <atk...@gmail.com <mailto:atk...@gmail.com>> wrote:

    or you could place the assert inside the backquote


    On Thu, Feb 21, 2013 at 3:10 PM, Jim foo.bar <jimpil1...@gmail.com
    <mailto:jimpil1...@gmail.com>> wrote:

        On 21/02/13 14:07, Jim foo.bar wrote:

            Hi all,

            I''d like to have a macro like the following but
            preferably without the 'eval' inside the assertion form:

            (defmacro defcomponent [name co]
             (assert (component? (eval co)) "Not a valid IComponent")
             `(def ~name ~co))

            If I don't use eval, everything works as long as I pass a
            var in...However if I pass in something like (String.
            "jam") it is not being evaluated and thus is a list not an
            object...and it will never satisfy IComponent.

            any thoughts?
            thanks in advance :)

            Jim



        I could have phrased this better...One of my arguments has to
        NOT be evaluated (name) but the other needs to be evaluated
        (co) so I can assert whatever I want to assert on it...I
        cannot use 'defn' (it will cause 'name' to be evaluated) so my
        only option is a macro that forces eval on the second arg, yes?


        Jim

-- -- 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
        <mailto:clojure@googlegroups.com>
        Note that posts from new members are moderated - please be
        patient with your first post.
        To unsubscribe from this group, send email to
        clojure+unsubscr...@googlegroups.com
        <mailto:clojure%2bunsubscr...@googlegroups.com>
        For more options, visit this group at
        http://groups.google.com/group/clojure?hl=en
        --- You received this message because you are subscribed to
        the Google Groups "Clojure" group.
        To unsubscribe from this group and stop receiving emails from
        it, send an email to clojure+unsubscr...@googlegroups.com
        <mailto:clojure%2bunsubscr...@googlegroups.com>.
        For more options, visit https://groups.google.com/groups/opt_out.





-- Please correct me if I'm wrong or incomplete,
    even if you think I'll subconsciously hate it.




--
Please correct me if I'm wrong or incomplete,
even if you think I'll subconsciously hate it.

--
--
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
Note that posts from new members are moderated - please be patient with your first post.
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
---
You received this message because you are subscribed to the Google Groups "Clojure" group. To unsubscribe from this group and stop receiving emails from it, send an email to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.



--
--
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
Note that posts from new members are moderated - please be patient with your 
first post.
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
--- You received this message because you are subscribed to the Google Groups "Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.


Reply via email to