Orden del código en Clojure

Question

Tengo un problema simple pero frustrante en Clojure, tengo una función (llamémosla función de lectura) que determina lo que el usuario quiere hacer desde su entrada y luego llama a otra función que hace eso (llamémoslo acción-función). Esta función de acción llama a la función de lectura cuando está lista para que el usuario pueda realizar otra tarea.

Ahora mi problema es que si pongo el código para la función de lectura antes del código de acción-función, aparece un error en la función de lectura que dice que no sabe qué función-acción es (porque el código porque está más abajo) y si hago lo contrario, bueno, obviamente recibo un error similar, diciendo que la función de lectura no se puede resolver, etc.

¿Hay una manera simple de solucionar esto?

El código real:

(defn ajout [botin] 
    (def botin botin) 
    (readCmd botin) 
) 

(defn readCmd [botin] 
    (println "Entrez une commande svp ") 
    (def botin botin) 
    (let [cmd (read-line)] 
    (if (.equals cmd "a") ((println "Ajout 8o") (ajout botin)) 
     (if (.equals cmd "e") ((println "Elim 8o") (eliminer botin)) 
     (if (.equals cmd "i") ((println "Imprim 8o") (imprimer botin)) 
      ((println "Commande invalide, nous vous rapellons que les commandes possibles sont : ") (print-les-cmd) (readCmd)))))) 


) 

como este, me sale un error en el (readCmd botin) línea en la función ajout diciendo: No se puede resolver símbolo: readCmd en este contexto

Si Pongo el código para estas dos funciones en orden inverso Obtendré un error diciendo: No se puede resolver el símbolo: ajout en este contexto

Answer 1

En la parte superior de su código ponga:

(declare readCmd) 

Answer 2

Puede usar las declaraciones de reenvío en Clojure para poder llamar a las funciones que aún no se han definido.

(declare readCmd) 

debería funcionar!

En Clojure, el orden en que se definen las funciones es importante, una función no puede llamar a otra función (o cualquier cosa para el caso) que aún no se haya definido. Es por eso que tenemos declaraciones avanzadas.

Answer 3

Como los demás ya respondieron, necesita (declarar readCmd) para solucionar su problema inmediato.

Sin embargo, todavía hay problemas con este código, ya que en realidad implementa un proceso iterativo utilizando la recursión mutua (readCmd -> ajout -> readCmd -> imprimer -> readCmd -> ...) que consumirá la pila y lo hará Obtendré (en) desbordamiento de pila. Una mejor forma de organizar esto sería hacer que readCmd sea recursivo y hacer que llame a las acciones. Cuando una acción retorna, readCmd tail recursivamente se llama a sí mismo.

también este fragmento de código:

((println "Ajout 8o") (ajout botin)) 

probablemente no es lo que quiere hacer: se llamará println y tratará de utilizar el resultado como una función. Utiliza "haces" en su lugar:

(do (println "Ajout 8o") (ajout botin)) 

También puede considerar leer sobre casos o cond, se simplificarán los ifs anidados.

Otra cosa extraña sobre su código es

(def botin botin) 

de qué se trata?

Answer 4

Hay un hilo en el grupo de Clojure Google acerca de esto que ofrece algunas consideraciones interesantes, en particular sobre cómo el uso de declarar puede tropezar con algunas herramientas en el ecosistema:

thread

Por supuesto, podría argumentar que las buenas herramientas deberían funcionar con todas las construcciones del lenguaje :)

IMO, te acostumbras al estilo ascendente y acabas de leer al revés. Es una historia un poco diferente tu historia donde construyes cosas en lugar de descomponerlas.

Y, por supuesto, como otros han dicho, puede reenviar declarar con

(declare my-function)