Size: a a a
VY
listener ← eventListener' \_ → send ("!hi!" <> User.toString me) *> listenunsafeCoerce, нужно было просто запустить свою монаду и запустить launchAff_, чтобы добраться до Effect, ничего сложногоЗП
KV
ЗП
KV
ЗП
elementAtKV
KV
KV
ЗП
Compose (Compose ... )VY
Ref (Array Message), я его постоянно обновляю вот тут:VY
VY
connect, но мб есть идеи по-лучше?ЗП
connect, но мб есть идеи по-лучше?VY
connect, а список сообщений перенесу в состояние того компонента, где он нуженVY
HalogenM если нужен коллбэк типа a -> m Unit
class Monad m <= Hub m whereошибка:
connect ∷ (Message → m Unit) → User → m Unit
-- так не канает
instance hubHalogenM ∷ Hub m ⇒ Hub (HalogenM s f g p o m) where
connect cb = lift ∘ connect cb
Could not match type
HalogenM s0 f1 g2 p3 o4 m5
with type
m5
ЗП
HalogenM <<< liftF <<< Lift <<< connect?VY
Lift & liftF, впервые встречаюЗП
Lift & liftF, впервые встречаю