I think your unquoting needs tweaking?

(defmacro defmathop
  "Constructs a macro to build inlined nested expressions with f applied
  to inner pairs and f2 to combine results."
  [name f f2]
  `(defmacro ~name
     ([a# b# c#] `(~'~f2 (~'~f ~a# ~b#) ~c#))
     ([a# b# c# d#] `(~'~f2 (~'~f ~a# ~b#) (~'~f ~c# ~d#)))))

On Sunday, February 23, 2014, Karsten Schmidt <i...@toxi.co.uk> wrote:

> Thanks, David! I tried that already and it didn't work:
>
> clojure.lang.Compiler$CompilerException:
> java.lang.ClassNotFoundException: cljs.core,
> compiling:(macromath/macros.clj:58:1)
>
> I also tried to require cljs.core in that macro's namespace, but then
> it complains this way:
>
> clojure.lang.Compiler$CompilerException: java.lang.RuntimeException:
> Can't take value of a macro: #'cljs.core/+,
> compiling:(macromath/macros.clj:59:1)
>
> Hmmm....
>
> On 23 February 2014 19:52, David Nolen <dnolen.li...@gmail.com> wrote:
> > You shouldn't use js*, and in this case it can be avoided. The problem
> > you're encountering is a long outstanding wart that ClojureScript macros
> > resolve symbols in Clojure not ClojureScript. Instead of + (which is
> > actually clojure.core/+) you want to specify cljs.core/+:
> >
> > (defmathop cljs.core/+ cljs.core/+)
> >
> >
> > On Sun, Feb 23, 2014 at 2:47 PM, Karsten Schmidt <i...@toxi.co.uk>
> wrote:
> >>
> >> After taking another look through cljs.core I managed to reformulate
> >> my macro using js* templates, but am still wondering why the "normal"
> >> (and cross-platform) solution doesn't work and also if using the js*
> >> way is actually safe in the future (i.e. not just a current
> >> implementation detail)?
> >>
> >> (defmacro defmathop
> >>   "Constructs macro to build inlined nested expressions with f applied
> >>     to inner pairs and f2 to combine results."
> >>   [name f f2]
> >>   `(defmacro ~name
> >>      ([a# b# c#]
> >>         (list '~'js* (str "((~{} " ~f " ~{}) " ~f2 " ~{})")
> >>               a# b# c#))
> >>      ([a# b# c# d#]
> >>         (list '~'js* (str "((~{} " ~f " ~{}) " ~f2 " (~{} " ~f " ~{}))")
> >>               a# b# c# d#))))
> >>
> >> (defmathop madd "*" "+")
> >>
> >> Thanks for any answers!
> >>
> >> On 23 February 2014 16:28, Karsten Schmidt <i...@toxi.co.uk> wrote:
> >> > Btw. My cljs example above is slightly wrong due to my simplifying the
> >> > email
> >> > example. I originally used this ns declaration
> >> >
> >> > (ns macromath.test
> >> >   (:require-macros [macromath.core :as m]))
> >> >
> >> > ...and then of course referred to (m/madd ...)
> >> >
> >> > But the issue remains regardless...
> >> >
> >> > On 23 Feb 2014 15:59, "Karsten Schmidt" <i...@toxi.co.uk> wrote:
> >> >>
> >> >> Hi, I've written a macro to build inline expanded math expressions
> and
> >> >> it's working well in Clojure, however fails with a compile exception
> >> >> in CLJS. I'm not sure if this is a shortcoming of the CLJS compiler
> or
> >> >> (much more likely) a mistake with my macro.
> >> >>
> >> >> (ns macromath.core)
> >> >>
> >> >> (defmacro defmathop
> >> >>   "Constructs a macro to build inlined nested expressions with f
> >> >> applied
> >> >>   to inner pairs and f2 to combine results."
> >> >>   [name f f2]
> >> >>   `(defmacro ~name
> >> >>      ([a# b# c#] `(~~f2 (~~f ~a# ~b#) ~c#))
> >> >>      ([a# b# c# d#] `(~~f2 (~~f ~a# ~b#) (~~f ~c# ~d#)))))
> >> >>
> >> >> (defmathop add + +)
> >> >> (defmathop sub - -)
> >> >> (defmathop mul * *)
> >> >> (defmathop div / /)
> >> >> (defmathop madd * +)
> >> >> (defmathop msub * -)
> >> >> (defmathop addm + *)
> >> >> (defmathop subm - *)
> >> >>
> >> >> lein repl
> >> >>
> >> >> (use 'macromath.core)
> >> >> (madd 2 3 4)
> >> >> ; 10
> >> >> (madd 2 3 4 5)
> >> >> ; 26
> >> >>
> >> >> My short CLJS test is as follows:
> >> >>
> >> >> (ns macromath.test
> >> >>   (:use-macros [macromath.core]))
> >> >>
> >> >> (defn ^:export main
> >> >>   []
> >> >>   (.log js/console (madd 2 3 4 5)))
> >> >>
> >> >> lein cljsbuild fails with this exception:
> >> >> Caused by: java.lang.IllegalArgumentException: No method in
> multimetho

-- 
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