@voidlizard я могу попытаться убрать и pollout

но точно не знаю как

А толку

Неидиоматично аж ппц

почему?

вызывать LBS.hPutStr идеоматично?

Extra.hPutStr делает тоже самое только чуть-чуть адекватнее

если бы из base побольше бы хорошего экспортировали то и занимало бы 3 строки

мне вообще оно нужно было чтобы hPutStr для ленивых строк атомарным был

и не прервался другой записью

а там было LBS.foldChunks B.hPutStrLn (pure ())

что очевидно не катит, т.к. на каждый чанк берётся лок на хэндле, проверяется writeable-ность и т.п.

Странный хаскель - io тормозит, а проц на 100% грузит.

@anarchostatist на хаскеле primes = 2:3:filter isPrime [5,7..] :: [Int] isPrime x = all (/= 0) . map (rem x) . takeWhile ((<= x) . (^2)) $ primes main = print . length . takeWhile (<= 2^24) $ primes

@eahqzsr как и питон?

только там io не тормозит и лишнего не делает

вообще у нас есть внутренние либы которые меееееедленно идут в сторону того, чтобы иметь хороший IO

т.к. в общем-то ни у кого нету времени и точного понимания того что же хочется

Как и питон, да. Но все равно оба упираются в проц. Но хаскель раньше. Кстати чистый питон уже медленнее хаскеля, только pypy быстрее.

ну хаскель в IO делает в 3 раза больше сисколов

вообще кстати в последних версиях 2.63 vs 3.0

может уже имеет смысл и ещё что-то кроме io тюнить

Да не должно оно влиять по идее, 3 сискола или 1 если их несколько сотен/тысяч в секунду всего.

ну немного точно влияет

ладно, подумаем что ещё можно сделать хорошего

@A64m_qb0 вектора (stream.unstream) unzip не умеют?

я правильно помню

не помню

декартово произведение то точно не делает

так что с вектором там разве что еще больше тормозов получить

кстати мы же храним столбцы?

в любом случае правый остается?

да оба остаются. ну, понятно один из них постепенно уменьшается

1.45!

интересно я результаты поломал

или нет

скорее всего поломал

нет

ЯХУУУ

питон порушен!

это что там такое было?

вектора + foldMap

щас загружу

@eahqzsr забирай вторую ревизию https://gist.github.com/qnikst/a06ebe89274fd56b58372e3f9e37ba76

@A64m_qb0 ^

оно будет есть память в двух местах: 1. файл читается полностью в строгую байтостроку 2. никто никогда не удаляет использованные строки

впрочем питон делает так же

Проблема что я не могу вкорячить фастбилдер потому что от требует бейз старый. По крайней мере мне так говорит cabal install

у меня cabal install и 8.0.2

так стоп

там fast-builder надо

или новый bytestring если билдер брать из него

библиотека bytestring-builder древняя перед мержем его в bytestring была

да сейчас-то и без фастбилдера сносная производительность будет

@eahqzsr ^

4.19 с обычным 😏

щас ещё размер чанка зафигачу

может тормозить сама итерация по префиксам и суффиксам?

уже обогнали

я не хочу больше ускорять

это бы немного объяснило, почему вектор лучше листа здесь

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

лист говно^W

ой, лист очень плохая структура для долгосрочного хранения

да и вектор забоксенный объектов говно

но лучше листа

но со строками ничего не поделать, конечно

да и лучше листа не всегда

ну вообще-то тут можно

у нас же строка вечная

можно хранить unboxed отступов

да

но И-ДЕО-МА-ТИ-Ч-НОСТЬ

питонисты засмеют

пусть обгонют сначала

вектор байтстрингов еще можно оправдать

я честно думал что там не произведение

надо сделать инстанс анбоксед векторов для строк (но там мутабельность обязательно поддерживать и придется аллокатор писать)

и что листы уйдут из памяти

кстати мы ж с @lonokhov что-то такое делали?