А апте есть, может и а никсе есть пакет

Исходник выше по треду

Я на телефоне, не могу выложить

Хотя

аншёл

Их там 2 версии.

Вторая еще выше по треду.

у меня вариант без билдера в том же порядке выводит, что и с билдером

я нашёл ближайшую

Ближайшая быстрее.

хм..

@eahqzsr так нужно слова местами переставлять или нет?

питон не переставляет

у @voidlizard переставляет

у @A64m_qb0 не переставляет, но если переставлять то баг

На скорость не влияет

2.65

pypy

Нет, переставлять не нужно. Но если это единственная проблема, то я переживу, поменяв парсиг-часть.

Аааа

ну влияет, но не сильно

ещё в 2 раза ускорять

без хаков:/

я в полтора раза фастбилдером ускорил

или посдедние замеры уже и так у всех с фастбилдером?

нет

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

угу, это на завтра задачка будет

блин я хотел streaming заюзать а там Prelude на Strings

есть streaming-bytestring

но он всегда чуть по тормознее байтстринга вроде

там вроде bytestring на что-то меняется адское

где потоковость явная

так

лази меняется

результаты программ разные

угу

[qnikst@nixos:~/workspace/myself/experiments/special-1]$ head result.python mygfc5tg3e mygfckwam1 mygfcebk5k mygfcfiyee mygfcy4r2w mygfcugdg5

ну как у меня

да

[qnikst@nixos:~/workspace/myself/experiments/special-1]$ head result.me mygfc5tg3e viv3s5tg3e xpa4e5tg3e 3b86a5tg3e nnc3m5tg3e

а понял

правлю

ок, 4.35 результаты совпадают

так давайка я свой hPut возьму

вспомнить бы где я его положил

ускорил свой вариант в 1.8 раз

о круто

только builder?

import qualified Data.ByteString.Char8 as S import qualified Data.ByteString.Lazy.Char8 as B import qualified Data.ByteString.FastBuilder as Builder import Data.Foldable (fold) import Data.Monoid ((<>)) main :: IO () main = B.interact processAll processAll = Builder.toLazyByteString . Builder.rebuild . fold . process . unzip . map toPairs . B.lines process (l1, l2) = [lb e1 <> lb e2 <> Builder.char8 '\n' | e1 <- l1, e2 <- l2] lb = Builder.byteString toPairs line = (el1, S.tail el2) where (el1, el2) = S.break (== ' ') . B.toStrict $ line

нет, это fast-builder

но собирание из строгих строк, по идее, должно и обычный ускорить

угу

4.55 стал

на обычном билдере

чего-то у меня мой writer работает хуже стандартного

хотя поидее отличается только тем что 1 раз вместо n лок на handle берёт

о, вернул справедливость

File system inputs: 0 File system outputs: 0 Socket messages sent: 0

в haskell

в питоне:

Swaps: 0 File system inputs: 0 File system outputs: 2148440

что бы это могло значить?

питон делает кучу write(1, "тут 4 строки")

блин по 4 точно спать пора..

по 110000

haskell по 32768 + poll

ещё и запись пустой строки на каждый чих

write(1, "", 0) = 0 poll([{fd=1, events=POLLOUT}], 1, 0) = 1 ([{fd=1, revents=POLLOUT}]) write(1, "ijj5tryfp5\r\nijj5tr61x8\r\nijj5tz4y"..., 32752) = 32752 poll([{fd=1, events=POLLOUT}], 1, 0) = 1 ([{fd=1, revents=POLLOUT}]) write(1, "", 0) = 0

с похожими настройками 4.06 у @A64m_qb0 вариант

3.24 вариант @voidlizard + builder

Это с твоим врайтером?

нет, мой врайтер оказался говном

не знаю почему

И всё, дно?

это с буффером 110000 вместо 32768

ну сейчас 3.24 vs 2.2

я хочу сделать адский хак и убедить rts быть с IO попроще

сейчас haskell делает + poll + write на каждый write

питон не делает