Достаточно обёртку экспортировать

Приветствую!

Я написал функцию которая создает atom-like объект значение которого сбрасывается через определенное время после каждого reset!

(defn timed-atom [x timeout-ms]
  (let [state (atom nil)
        reset (fn [newval]
                (some-> state deref :promise (deliver :stop))
                (let [p (-> state (reset! {:value newval :promise (promise)}) :promise)]
                  (future
                    (if (= :timeout (deref p timeout-ms :timeout))
                      (reset! state nil))))
                newval)]
    (if (some? x) (reset x))
    (reify
      IDeref (deref [_] (-> state deref :value))
      IAtom (reset [_ x] (reset x)))))

насколько идеоматичен такой код

(defn timed-atom [x timeout-ms]
  (let [state (atom nil)
        reset (fn [newval]
                (some-> state deref :promise (deliver :stop))
                (let [p (-> state (reset! {:value newval :promise (promise)}) :promise)]
                  (future
                    (if (= :timeout (deref p timeout-ms :timeout))
                      (reset! state nil))))
                newval)]
    (if (some? x) (reset x))
    (reify
      IDeref (deref [_] (-> state deref :value))
      IAtom (reset [_ x] (reset x)))))

жа почему бы и нет, но:

1. блокировать целый тред на что бы сбросить где-то значение это как-то слишком. как насчет сбрасывать-on-read?
2. IAtom это не только reset

т.е. тут вопрос перформанса и корректности, а не какой-то странной "идеоматичности"

бтв, возвможно в данном случае вообще лучше стоит обернуть в атом core.cache с ttl?

Спасибо за отзыв

1. Сбрасывать при чтении - отличный вариант. Попробую.
2. Это intentional. Swap в моем случае не нужен.

Это как?

Если это intentional то не стоит называть это атомом и частично поддерживать интерфейс, никому проще от этого не станет

Создай свой протокол и заимплементь его

а кто-нибудь добивался в идее, чтобы можно было выделить форму сочетанием клавиш?

как в виме — vaf

Ctrl-W?

Alt+Up, Alt+Down я пользуюсь expand-selection

а можешь сказать, как команда называется? У меня ctrl+w ничего не делает

Наверное expand selection и есть

Можно посмотреть и поискать в хоткеях- там есть поиск

expand selection  не то, что надо.
Я просто везде пользуюсь  вимом — и в емаксе, и в идее, и в браузере. Там есть концепция vaw — выделить слово, vi[ — выделить внутри квадратных скобок, dt) удалить до ")".

Для лиспа придумали, что можно "f" использовать, которая означает форму. Я это для вима и емакса настроил, а для идеи никак не могу.