Проверка строки равно значение хэш-карта Clojure - Не может быть отлиты

Question

Так у меня есть функция, я делаю два, если заявления на первый один, кажется, работает, но второй один производит ошибку

ClassCastException java.lang.String cannot be cast to clojure.lang.IFn user/sort-maps (NO_SOURCE_FILE:1559) 

функция проходит в два Карта «m1 + m2» и две строки «s1 s2» проблема кусок кода:

Что я пытаюсь сделать, это посмотреть, если строка «s1» равна строке от значения на «карте s2», но я продолжаю получать эту ошибку. Это функция у меня есть

(defn sort-maps [map1 map2 s2 s1] 
    (if-not (contains? map1 s2) 
    [(assoc map1 s2 s1) map2] 
    [map1 (assoc map2 s2 s1)]) 

    (if-not (= (get map1 s2)(s1)) 
    [(dissoc map2 (get map1 s2))] 
    [map1 (assoc map2 s2 s1)])) 

Мой вход:

"door" "rood" "odor" "pen" "list" "silt" "#" 

Мой выход я хочу бы:

{"enp" "pen"} 

Как я только хочу, чтобы вернуть слова, которые не могут быть сделаны вверх в любое другое слово на входе

Answer 1

s1 - это строка, но, обернув ее в parens, вы м вызов функции. Строка не является функцией, поэтому вы видите ошибку типа.

Вы, вероятно, хотите (if-not (= (get map1 s2) s1))

Но вы, кажется, имеют более глубокое недопонимание. Структуры данных Clojure: неизменяемые. Это означает следующее:

user=> (def my-map {:a 1 :b 2}) 
#'user/my-map 
user=> (assoc my-map :c 3) 
{:a 1, :b 2, :c 3} 
user=> my-map 
{:a 1, :b 2} 
user=> (dissoc my-map :a 1) 
{:b 2} 
user=> my-map 
{:a 1, :b 2} 

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

Answer 2

munk правильно указал на источник вашей ошибки: (s1) сообщает Clojure вызывать s1 как функцию без аргументов. Однако, даже после исправления этого, ваш код вряд ли сделает то, что вы ожидаете от него.

Это тело функции sort-maps (с коррекцией Мунка): выполняется

(if-not (contains? map1 s2) 
    [(assoc map1 s2 s1) map2] 
    [map1 (assoc map2 s2 s1)]) 

(if-not (= (get map1 s2) s1) 
    [(dissoc map2 (get map1 s2))] 
    [map1 (assoc map2 s2 s1)]) 

Первое if-not заявление и результат (либо пара обновленных map1 и map2 или пара map1 и обновляется map2) выбрасывается. Поскольку карты в Clojure неизменяемы, assoc не собирается добавлять новую запись в существующую карту - вместо этого создается новая карта. Таким образом, эта функция тело полностью эквивалентно просто

(if-not (= (get map1 s2) s1) 
    [(dissoc map2 (get map1 s2))] 
    [map1 (assoc map2 s2 s1)]) 

Я не уверен, что вы делаете здесь, так что не может помочь вам в дальнейшем.