ошибка при определении функции с помощью if - PullRequest
Новая
       24

ошибка при определении функции с помощью if

3 голосов
/ 09 октября 2011

У нас есть простое определение функции: 

(defn calculate [d x y]
  ((if (and (== d 1) (== x 1) (== y 0))
     1
     0)))
(println (calculate 1 1 0))

Но это приводит к этой ошибке: 

Exception in thread "main" java.lang.reflect.InvocationTargetException
    at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
    at sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:57)
    at sun.reflect.DelegatingMethodAccessorImpl.invoke    (DelegatingMethodAccessorImpl.java:43)
    at java.lang.reflect.Method.invoke(Method.java:616)
    at jline.ConsoleRunner.main(ConsoleRunner.java:69)
Caused by: java.lang.ClassCastException: java.lang.Long cannot be cast to clojure.lang.IFn
    at user$calculate.invoke(main.clj:13)
    at user$eval5.invoke(main.clj:17)
    at clojure.lang.Compiler.eval(Compiler.java:6465)
    at clojure.lang.Compiler.load(Compiler.java:6902)
    at clojure.lang.Compiler.loadFile(Compiler.java:6863)
    at clojure.main$load_script.invoke(main.clj:282)
    at clojure.main$script_opt.invoke(main.clj:342)
    at clojure.main$main.doInvoke(main.clj:426)
    at clojure.lang.RestFn.invoke(RestFn.java:408)
    at clojure.lang.Var.invoke(Var.java:401)
    at clojure.lang.AFn.applyToHelper(AFn.java:161)
    at clojure.lang.Var.applyTo(Var.java:518)
    at clojure.main.main(main.java:37)
    ... 5 more

(Кстати, строка 13 - это строка с if и and).

То же самое с векторами: 

(defn calculate [vectorr]
  ((if (and (== (vectorr 0) 1) (== (vectorr 1) 1) (== (vectorr 2) 0))
     1
     0)))
(println (calculate [1 1 0]))

Это приводит к: 

Caused by: java.lang.ClassCastException: java.lang.Long cannot be cast to clojure.lang.IFn

... то же самое.

И скарта: 

(defn calculate [mapp]
  ((if (and (== (mapp :d) 1) (== (mapp :x) 1) (== (mapp :y) 0))
     1
     0)))
(println (calculate {:d 1 :x 1 :y 0}))

Результат в том же сообщении: 

Caused by: java.lang.ClassCastException: java.lang.Long cannot be cast to clojure.lang.IFn

Мы думаем, что это как-то связано с if или сравнениями.Мы попробовали это с нормальными аргументами, вектором в качестве аргумента и с картой как таковой, и, очевидно, ошибка остается той же.

Мы также попробовали много других вариантов без лучшего понимания реальной проблемы.

Ответы [ 2 ]

6 голосов
/ 09 октября 2011

У вас есть лишняя пара скобок вокруг тела функции, что означает, что вы хотите вызвать результат if (который равен либо 1, либо 0, то есть длинному).

Должно быть: 

(defn calculate [vectorr]
  (if (and (== (vectorr 0) 1) (== (vectorr 1) 1) (== (vectorr 2) 0))
     1
     0))
0 голосов
/ 09 октября 2011

Дополнительные скобки приводят к сбою вашей программы, потому что они изменяют тип возвращаемого вами выражения. Заключая что-либо в круглые скобки, в clojure, вы заканчиваете упаковкой выражения как функции. Затем ваша программа, которая ссылается на вывод этой функции, теперь фактически ссылается на саму функцию.

Я обнаружил, что 90% времени, если я получаю исключение приведения класса в clojure, это потому, что я создал cloSure случайно.

...