I
F# 5
async {
let! async1 = ...
and! async2 = ...
return (async1, async2)
}
Size: a a a
2020 June 16
RM
VK
Ребят, как для Async сделать zip без сторонних либ? (запустить 2 задачи паралельно и получить Async из пары)
async.startchild x2, await, return x1, x2
I
F# 5
async {
let! async1 = ...
and! async2 = ...
return (async1, async2)
}
async {
let! async1 = ...
and! async2 = ...
return (async1, async2)
}
Проверял? Мы тут на днях осуждали, что там для async не реализовали and!
RM
Проверял? Мы тут на днях осуждали, что там для async не реализовали and!
не проверял
забавно, что не реализовали
забавно, что не реализовали
VS
Ребят, как для Async сделать zip без сторонних либ? (запустить 2 задачи паралельно и получить Async из пары)
Async.Parallel ?
VS
Типы у асинков разные (можно конечно извратиться с DU или кастами)
но StartChild нормас подход
но StartChild нормас подход
ну в сишарпе просто - кастанул и радуешься)
VS
это кстати может быть хороший пример того зачем нужны HKT
VS
Типы у асинков разные (можно конечно извратиться с DU или кастами)
но StartChild нормас подход
но StartChild нормас подход
вот кстати пример с кастами от самого Дона)
http://www.fssnip.net/ab/title/AsyncParallel2-and-AsyncParallel3
http://www.fssnip.net/ab/title/AsyncParallel2-and-AsyncParallel3
VS
Подскажите плиз снова по фпарсеку, вот у меня есть код который работает
dfPropetry и dfObject это мои парсеры, а я хочу чтобы и такой код работал
а он мне кидает ошибку парсинга, т.е. dfProperty не получилось распарсить и вместо фоллбэка на dfObject кидается ошибка
let item = choice [
dfProperty
dfObject
]
let dfRoot =
item .>>. dfObject |>> DFRoot
dfPropetry и dfObject это мои парсеры, а я хочу чтобы и такой код работал
let item = choice [
dfProperty
dfObject
]
let dfRoot =
item .>>. item |>> DFRoot
а он мне кидает ошибку парсинга, т.е. dfProperty не получилось распарсить и вместо фоллбэка на dfObject кидается ошибка
Expecting:...VK
If
А что в dfproperty?
p1 fails with a non‐fatal error and without changing the parser state, the parser p2 is appliedА что в dfproperty?
VS
let dfProperty =
manyCharsTill (noneOf <| seq { '{'; '}'; ' ' }) (skipChar ':') .>> spaces .>>. dfLiteral .>> spaces |>> DFProperty
VS
let dfObject =
manyCharsTill anyChar (skipString " {") .>> spaces .>>. (many dfProperty) .>> (skipChar '}') |>> DFObject
VK
Я слабо помню почему я так писал, но возможно тебе надо тоже через attempt
https://github.com/Liminiens/grinder/blob/master/src/Grinder/Commands.fs#L92
https://github.com/Liminiens/grinder/blob/master/src/Grinder/Commands.fs#L92
VS
пасиб, попробую
VS
супер, помогает)
VK
Видимо там состояние меняется и он падает в обычном виде
VS
ну я хз как отключить состояние, везде вопросики доставил к .>>, все равно валилось