v-stream

main :: IO () main = do ws <- BS8.lines <$> BS8.getContents let s = V.map (\v -> case BS8.words v of (a:_) -> a) $ V.fromList ws BSL.hPutStr stdout $ Builder.toLazyByteStringWith 110000 110000 $ foldMap (\suff -> V.foldr (\pref nx -> Builder.byteString suff <> Builder.byteString pref <> Builder.char8 '\n' <> nx) mempty (mkP ws)) s {-# NOINLINE mkP #-} mkP = V.map (\v -> case BS8.words v of (_:b:_) -> b) . V.fromList

а с foldMap вместо V.foldr медленнее что ли?

написать чтоли на sml и clean для смеха?

Клапауций?

Задача реальная. Нужно кормить данными другую программу с минимальной загрузкой проца.

а можешь хотя бы примерно очертить бэкграунд или секрет? какая предметная область хотя бы?

@A64m_qb0 на удивление да

а вопросы по purescript сюда задавать или есть отдельный чат?

короче, purs-loader для вебпака не запускает функцию main модуля, который прописан в entry с unsafePerformEff всё запускается это нормальная практика или всё-таки можно заставить вебпак/purs-loader запускать main самостоятельно

а вопросы по purescript сюда задавать или есть отдельный чат?

еще в фрп можно

https://github.com/mersinvald/rust-vs-haskell-special-olimpiade/tree/stable

dmz@zen ~/tmp/bsfuck/rust-vs-haskell-special-olimpiade $ time ./target/release/rust-vs-haskell < ../49zGQ6Zt.txt > /dev/null read: 0.0 tokenize: 0.3 main: 1.383 real 0m1.391s user 0m1.384s sys 0m0.004s

а вопросы по purescript сюда задавать или есть отдельный чат?

purescript - давно уже отдельный язык, так что лучше искать отдельное же сообщество (продуктивнее будет). И если на общие вопросы типа "как мне лучше поисать то-то на ATD?", или "а инстанс функтора для этого типа вообще нужен?" тут могут помочь с ответом, то в тюнинг webpack для пурсы тут мало кто умеет :) Можно ещё к тем же elm'ерам постучаться - эти хоть фронтендом занимаются и вебпаки пользуют (не все, к счастью)

https://twitter.com/voidlizard/status/922331703418478592

https://twitter.com/voidlizard/status/922334489224843264

по поводу читабельности - я могу раздербанить свой сишный код на отдельные функции с человеческими именами. А потом компилятор за меня все вернет как было.

эта

почитайте релиз: https://gist.github.com/voidlizard/c736e3d7fcd382c6f9904f8b653102b5

черт, опять моя рожа на снипете. как это побороть?

картинку же вставил

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

могу еще скала-джава добавить, на моей тачке в районе 11сек тюнить ио я не умею, потребуется погружение отдельное зато сейчас оно читабельное)

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

у себя

если есть желание добавить ссылку на Java - давай ссылку, я вставлю в пост

https://gist.github.com/optician/830cb8fe1212eae055ec9fdfb1cd78a8

почитайте релиз: https://gist.github.com/voidlizard/c736e3d7fcd382c6f9904f8b653102b5

имо раст победил по скорости первого пришедшего в голову кода

3s?

3s

да

а питон 4

ну, тут такое - что 6 строк питона или 10 значимых (без импортов) хаскелла в голову придут, я еще как-то верю. но по 50 срок за раз мне в голову уже не приходит, но ок, пусть так

раст же все равно победил

это, кстати, хорошо

спасибо что не си

у меня сейчас раст обногяет сишку

что удивительно

сраный си должен давно умереть

году бы в 82-ом

1982

тогда б глядишь и плюсов бы не было

блин что-то у меня сегфолт на ровном месте

хаха

-foptimize-strlen + -fcse-follow-jumps и привет сегфолт

а есть все варианты как в одно гисте с разными файлами?)

все таки надо сделать сишку на mmap

а что там ммапать то?

можно в анонимный файл писать stdin разве что

можно stdin ммапнуть и таким образом избавится от копирования

почитайте релиз: https://gist.github.com/voidlizard/c736e3d7fcd382c6f9904f8b653102b5

Спасибо, интересно

куда копирования?

хотя интернеты говорят что так лучше не делать

Только имхо, сравнивать надо не md5(out), а md5(sort(out))

В исходном ТЗ по-моему про порядок ничего не было

в сишной версии же считывается ввод и пишется в буфер?

А так вы уменьшили простор для оптимизаций

@qnikst чего? в моей сишной версии токены копируются

сначала генерится strchunk - список строк для каждого токена. потом в emit_token копируются в целевой буфер

@Masteroid вывод квадратичен от входа. на бОльших входных данных эта метрика умрёт

А зачем сравнивать на больших?

На маленьких сверяете output, на больших тестите уже скорость

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

надо, что бы на любых работало

нормально

без неожиданного жора памяти и тп

поэтому мы и писать всё в большой выходной буфер запрещаем в этой олимпиаде

ну у меня например ничего не копируется

в си или хаскеле?

нужно только токенизацию получше сделать и вектор длин хранить

си

я ну я про свою версию пишу,

я спросил про mmap

если есть дополнение про твою версию - давай ты напишешь и вставим абзац

я не придумал куда его прикрутить

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

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

не понимаю почему у меня сегфолты : (

надо видимо хацкели работать а не си

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

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

Это понятно, но можно же сравнивать корректность выхода на небольших входах, а сравнивать времена работы уже на больших. Впрочем, дело ваше.

ну это ж гиморой, а ради чего?