Ejemplos simples pero convincentes de macros que ya no están en Clojure

Question

Estoy tratando de escribir un macro tutorial, y ahora necesito algunos ejemplos que son simples de entender, y sin embargo convincentes.

El problema es que muchas de las cosas obvias ya están en clojure y contrib. Y creo que "mira, podemos volver a implementar todas las funciones de la biblioteca" podría no ser el mejor argumento para explicar por qué las macros son tan geniales.

¿Alguien ha recibido ejemplos bonitos (los de una línea son los mejores) que no les importaría que utilizara?

Aquí están las tres primeras partes del tutorial. En este momento es un poco vulgar, por lo que cualquier comentario sobre cómo podría mejorarse sería recibido con gratitud.

http://learnclojure.blogspot.com/2010/09/clojure-macro-tutorial-part-i-getting.html

http://learnclojure.blogspot.com/2010/09/clojure-macro-tutorial-part-ii-compiler.html

http://learnclojure.blogspot.com/2010/09/clojure-macro-tutorial-part-ii-syntax.html

Answer 1

me gustaría hablar más sobre los patrones: cuándo y cómo se una macro utiliza. por ejemplo ...

• Protección de un recurso. Ejemplos: binding, with-open, ...

  (let [~x (get-resource)] (try ~@dostuff (finally (release-resource ~x))))

• Definir cosas. Ejemplos: defn, defsnippet (enlive), defservice (anillo)
• División de macro/controlador. Especialmente esta técnica quita mucho dolor macro. Me gusta la evaluación o captura múltiple. Ejemplo: with-bindings
• Embellecer código feo. p.ej. cuando Taming multi-dim arrays

Answer 2

estoy trabajando en algún software de criptografía en clojure. Es muy divertido y el uso de pruebas unitarias lo hace más divertido porque no me pongo nervioso por romper las cosas. El problema es que todas las funciones de criptografía generan resultados diferentes en todo momento, ya que están impulsadas por un generador de números al azar bastante incorrecto.

¿Cómo se prueban las funciones aleatorias?

con un enlace macro por supuesto!

(defmacro with-fake-prng [ & exprs ] 
    "replaces the prng with one that produces consisten results" 
    `(binding [com.cryptovide.split/get-prng (fn [] (cycle [1 2 3])) 
      com.cryptovide.modmath/mody 719 
      com.cryptovide.modmath/field-size 10] 
     ~@exprs)) 

luego envuelvo mis funciones de prueba en (with-fake-prng (deftest mytest ....))

clojure tiene una gran cantidad de estos "macroes bind". como with-out-string y tal.

También tengo una macro que carga cada espacio de nombres en la réplica. (No utilizo esto mucho ahora que he cambiado a la torta)

(defmacro load-all [] 
    '(use 
    :reload-all 
    'com.cryptovide.modmath 
    ... 
    'com.cryptovide.gui 
    'com.cryptovide.checksum 
    'com.cryptovide.log)) 

PS: siempre importa la primera regla del club de macro