169 похожих чатов

Добрый день. Я написал (стащил с интернета) функцию которая меняет элемент

в листе.
replace :: (Int, a) -> [a] -> [a]
replace (index, element) list = before ++ [element] ++ after
where
(before, _:after) = splitAt index list
Предложенная в интернете имплементация работает. Но, как мне кажется, альтернативная имплементация:
replace :: (Int, a) -> [a] -> [a]
replace (index, element) list = before ++ [element] ++ after
where
(before, tail after) = splitAt index list
ломает hls & ghc:
` Error | ormolu: Internal Error: ormoluCmd: OrmoluParsingFailed (RealSrcSpan SrcSpanOneLine
"/home/archlnv/Documents/Haskell/liaths-game/app/Main.hs" 32 14 24 Nothing) "[GHC-07626] Parse error in pattern: tail"\n'
`
Что не так с использованием tail?

4 ответов

1 просмотр

В матчинге можно указывать конструкторы, но не функции

можно сделать {-# LANGUAGE ViewPatterns #-} ... (before, tail -> after) = splitAt index list

Danil Berestov
можно сделать {-# LANGUAGE ViewPatterns #-} ......

и тогда будто это то, что ты хочешь

Похожие вопросы

Обсуждают сегодня

а проверьте, собирается ли у кого сейчас транк лазаря через делюкс? у меня вот: fpcupdeluxe: info: Lazarus Native Installer (BuildModuleCustom: UserIDE): LazBuild: building Us...
Iluha Companets
20
добрый день. возможно ли изменить цвет окон лазаруса? Как?
Budemposmotret
35
This is a big issue. Just by being a citizen of a country, you are denied to contribute to Open Source software: https://youtu.be/L5Ec5jrpLVk?si=1iIuHnMPbCB4anV-
Sharuzzaman Ahmat Raslan
72
Господа, а кто-нибудь сталкивался с размещением на TTabControl/TTabSheet множества контролов (> 100) с последующими External: Access violation? Вот буквально на ровном месте. ...
Dmitry
29
Вот например простой пример, как получить стоимость хешрейта монеты монеро с сайта whattomine.com c использование сеарилизатора при парсинге JSON TaskProfit := TTask.Run(proc...
Delphi Coder
2
А какие существуют способы обработки ошибок выделения памяти в ядре? Т.е., допустим, есть функция, которая возвращает адрес свободной страницы в физической памяти и диапазон в...
disba1ancer
51
ну так че, сделать програмулину, в которую можно добавлять в Едиты свои строчки кода(закладки) а потом по ним прыгать. ну и сохраняться они естественно будут той програмуленно...
Kraszx
15
Does anyone have some zeroday's left?
Wito!d ♥️🩷
44
Приветствую всех!)) Подскажите, а кто мог бы написать на делфи движок (самую базу) интерпретатора очень легковесного и минималистичного языка программирования? Язык - проце...
Моринаро
8
#include <stdlib.h> #include <stdio.h> #include <math.h> #include <assert.h> #include <limits.h> long long avg3(long long a, long long b, long long c) { if (a == b && b =...
Malformed C
4
Карта сайта