Where communities thrive


  • Join over 1.5M+ people
  • Join over 100K+ communities
  • Free without limits
  • Create your own community
People
Activity
  • Nov 23 2019 14:39
    cblp closed #92
  • Nov 23 2019 14:39
    cblp commented #92
  • Nov 23 2019 14:39
    cblp commented #109
  • Nov 23 2019 14:38

    cblp on gh-pages

    Update link (#109) https://has… (compare)

  • Nov 23 2019 14:37

    cblp on qnikst-patch-1

    (compare)

  • Nov 23 2019 14:37

    cblp on master

    Update link (#109) https://has… (compare)

  • Nov 23 2019 14:37
    cblp closed #109
  • Nov 22 2019 20:25
    qnikst review_requested #109
  • Nov 22 2019 20:25
    qnikst opened #109
  • Nov 22 2019 20:24

    qnikst on qnikst-patch-1

    Update link https://haskell-la… (compare)

  • Nov 18 2019 08:43
    cblp commented #92
  • Nov 17 2019 09:57
    qnikst commented #92
  • Nov 10 2019 09:01

    cblp on gh-pages

    Add The Haskell Phrasebook (compare)

  • Nov 10 2019 09:01

    cblp on master

    Add The Haskell Phrasebook (compare)

  • Oct 31 2019 16:10
    cblp edited #106
  • Oct 31 2019 16:10
    cblp commented #106
  • Oct 31 2019 16:08

    cblp on master

    Add some text from #106 (compare)

  • Oct 30 2019 10:33

    cblp on master

    Add draft of `effects-haskell` … (compare)

  • Oct 30 2019 10:13

    cblp on gh-pages

    Add `sic` to `хаскелит` (compare)

  • Oct 30 2019 10:12

    cblp on master

    Add `sic` to `хаскелит` (compare)

Alexander Babin
@mudriyjo
@cblp thanks
Gleb Popov
@arrowd
Нынче репа актуальна?
Yuriy Syrovetskiy
@cblp
по слухам, да
klapaucius
@klapaucius
Репа вроде уже достаточно сгнила чтоб было как то неудобно ее рекомендовать, но массив еще недостаточно доделан, чтоб можно было его уверенно рекомендовать
Alexander Tchitchigin
@gabriel-fallen
Оказалось, "массив" - это Data.Massiv...
А что там ещё недостаточно доделано?
klapaucius
@klapaucius
@gabriel-fallen да просто этой библиотекой пока не пользуется примерно никто, даже сам автор для своей либы для работы с изображениями, так что как-то нет уверенности, что готово для продакшона
Alexander Tchitchigin
@gabriel-fallen
@klapaucius а он свой Massiv написал не от фрустрации ли использования Repa для этой своей либы для работы с изображениями?
klapaucius
@klapaucius
От нее, конечно, тем не менее, переписывание на массив пока не закончено
Gleb Popov
@arrowd
Кто-нибудь пользовался пакетом graphviz? Недоумеваюсь как из распарсенного дота сделать граф fgl.
Yuriy Syrovetskiy
@cblp
разобрать DotGraph и собрать что нужно, видимо
Alexander Tchitchigin
@gabriel-fallen
А fgl всё ещё актуальна? Мы использовали на позапрошлом (помнится) ICFPC - я не был впечатлён ни функциональностью, ни произволительностью. Ничего лучше всё равно нет?
Yuriy Syrovetskiy
@cblp

dotToGraph :: (DotRepr dg Node, Graph gr) => dg Node -> gr Attributes Attributes

A pseudo-inverse to graphToDot; "pseudo" in the sense that the original node and edge labels aren't able to be reconstructed.

@gabriel-fallen, смотрел на algebraic-graphs?
Alexander Tchitchigin
@gabriel-fallen
@cblp нет, пристально ни на что не смотрел. Но видно, что в containers тоже есть что-то про графы.
Bombin Valentin
@wwall
Всем привет. Вопрос - возможно ли как-то при вызове stack new указать сразу использование alex и happy?
Alexander Tchitchigin
@gabriel-fallen
Но Alex и Happy там не видать.
Yuriy Syrovetskiy
@cblp
@wwall, а куда вы их вызывать собираетесь?
они должны сами вызываться для каждого .x и .y модуля, перечисленных в кабалфайле
Gleb Popov
@arrowd
@cblp Дык у fgl'ского графа инстанса DotRepr нет.
Yuriy Syrovetskiy
@cblp
@arrowd, разве dotToGraph его требует?
Gleb Popov
@arrowd
А, действительно, неправильно прочитал.
Спасибо.
Gleb Popov
@arrowd
Я чет так и не осилил извлечение подграфа по метке узла с помощью graphviz.
Yuriy Syrovetskiy
@cblp
на чём застрял?
Gleb Popov
@arrowd

Сначала я его распарсил в DotGraph a из http://hackage.haskell.org/package/graphviz-2999.20.0.3/docs/Data-GraphViz-Types-Graph.html

Распарсить таким образом, чтобы в a был лейбл я не смог, поэтому пришлось написать функцию, которая проходит по всему графу и матчит ноду с нужными атрибутами. У найденной ноды дернул successors, а это оказались только непосредственные последователи. Т.е. тут тоже чет рекурсивное надо было изобретать, поэтому я забил.
Потом через fgl пробовал, но там оказалось что при восстановлении назад из fgl в дот он какую-то информацию теряет. Не помню уже что именно. Я расстроился и пошел пить.

Gleb Popov
@arrowd
А есть парсер XML а-ля Aeson.TH? Чтобы я ему дататайп, а он сам парсер придумал.
Alexander Tchitchigin
@gabriel-fallen
Я знаю про https://github.com/typeable/xml-isogen но он немного наоборот работает...
nickbeljaev
@nickbeljaev
"Неизлечимая" утечка памяти в простой функции
Yuriy Syrovetskiy
@cblp
отформатируйте как код, пожалуйста
nickbeljaev
@nickbeljaev
Сейчас научусь :) я тут впервой.
Yuriy Syrovetskiy
@cblp
просто вставьте ``` в начале и в конце
почему вы считаете, что функция не должна течь? как вы это доказали?
как минимум для переменной s только строятся задумки (s + 1), но никогда не вычисляются
nickbeljaev
@nickbeljaev
Я это не доказывал, я пытаюсь понять куда течет
g ks (x0,xs,s)
  |x0 == x0' = (x0,s)
  |True = g ks (x0',x0:take 30 xs,(s+1))
  where
  x0' = f xs ks /sum ks

f (x:xs) (k:ks') = x*k + f xs ks'
f _ _ = 0

main = g [2,3,9] (1,[],0)
Чет у меня с форматированием не очень переносы строк исчезли...
Yuriy Syrovetskiy
@cblp
просто вставьте отдельную строку, на которой написаны ```, перед и после текста
как минимум, течёт s
sum тоже линейно память потребляет на некоторых уровнях оптимизации
nickbeljaev
@nickbeljaev
sum проверял - заменял на число - течет
nickbeljaev
@nickbeljaev
s проверил - заменил на число - течет, да и не мог Int счетчик течь, тогда бы вообще все программы текли бы.
Да еще момент - я это в ghci проверяю. Обычно мне удается и там сделать без утечки, но в данный случай заколдованный
nickbeljaev
@nickbeljaev
g ks (x0,xs,s)
  |x0 == x0' = (x0,s)
  |True = seq s $ g ks (x0',x0:take 30 xs,1)
  where
  x0' = f xs ks /14

f (x:xs) (k:ks') = x*k + f xs ks'
f _ _ = 0
так тоже течет x0 x0' должны разрешаться до числа для сравнения в моем понимании, если это не так то понятно куда, но они должны вычисляться?
nickbeljaev
@nickbeljaev
g ks (x0,xs,s)
  |x0 == x0' = (x0,s)
  |True = g ks (x0',x0:take 2 xs,s)
  where
  x0' = f xs ks /sum ks

f (x:xs) (k:ks') = x*k + f xs ks'
f _ _ = 0
практический ответ найден, при take 2 ... take 3 ... утечки нет, при take 4 и более начинается стремительная утечка, получается лишний хвост из более чем 1 элемента влечет утечку (видимо мусорщик считает что этот хвост потом пригодится...) но это мои фантазии.
Alexander Tchitchigin
@gabriel-fallen
@nickbeljaev если Вы запускаете код в GHCi, то он компилируется без оптимизаций, и анализ строгости, уверен, вообще не проводится. В этом случае да, даже Инты "утекают". Не говоря уже про вызовы take. Либо расставьте аннотации строгости руками, либо хотя бы соберите с оптимизацией, для начала.
Yuriy Syrovetskiy
@cblp

@nickbeljaev

s проверил - заменил на число - течет, да и не мог Int счетчик течь, тогда бы вообще все программы текли бы.

в других программах счётчиков или нет, или они строгие

Yuriy Syrovetskiy
@cblp
@nickbeljaev, f = sum . zipWith (+)
@nickbeljaev, да x0 == x0' должно вычислять x0 и x0', x0' приводит к полному вычислению xs и ks, в результате они начинают занимать всю свою память, но не освобождаются, потому что передаются дальше