A
и через него поставь
ghcup install ghc 9.0.1
ghcup set ghc 9.0.1
ghcup install ghc 9.0.1
ghcup set ghc 9.0.1
Size: a a a
2021 July 04
A
ну тогда считай тебе повезло
[
а в стак проекта как добавить ghc 9
[
потому что он же создаёт виртуальное окружение
[
чем мне глобальный ghc поможет
A
а там есть иша уже, в ней Адам резолвер указал для 9ки
[
а, ок
A
можешь его заюзать
[
а, нашёл
[
ну, с этим я справлюсь по идее
A
ну давай, есть правда шанс, что мне кто-нибудь в личку напишет, и придётся мне это сделать в течение дня, но крайне бы не хотелось
A
но если так случится, то тогда я тебе дам другую возможность сделать что-то простое и полезное
A
не буду пока забегать вперёд
AG
сфюзил дуп и известную формулировку фолдла через фолдр
[
там в экстра-депсах мейна указан крон и сервант-мультипарт, а на скрине сервант-клиент без крона
це норм?
це норм?
[
я чёт тока щас понял, что пошёл качать зависимости с мобильного интернета
ХГ
Так и будет.
ХГ
lastbut1 :: Foldable f => f a -> a
lastbut1 = fst . foldl (\(a,b) x -> (b,x)) (err1,err2)
where
err1 = error "lastbut1: Empty list"
err2 = error "lastbut1: Singleton"
lastbut1safe :: Foldable f => f a -> Maybe a
lastbut1safe = fst . foldl (\(a,b) x -> (b,Just x)) (Nothing,Nothing)
lastbut1 = fst . foldl (\(a,b) x -> (b,x)) (err1,err2)
where
err1 = error "lastbut1: Empty list"
err2 = error "lastbut1: Singleton"
lastbut1safe :: Foldable f => f a -> Maybe a
lastbut1safe = fst . foldl (\(a,b) x -> (b,Just x)) (Nothing,Nothing)
