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

А в release не пробовал?)

А в release не пробовал?)

Нет. ) Не стал рисковать

Хвостовая рекурсия - одна из причин отсутствия поддержки f# в. Net native

https://stackoverflow.com/a/29571052

Вот

Короче, C# может в хвостовую рекурсию, если сильно захочет

На сколько я помню Roslyn с этим справляется

Короче, C# может в хвостовую рекурсию, если сильно захочет

но зачем

Короче, C# может в хвостовую рекурсию, если сильно захочет

ого

насколько я помню она оптимайзится в цикл

насколько я помню она оптимайзится в цикл

в этом смысл ховостовой рекурсии)

но зачем

Чтобы хейтить джаву

в этом смысл ховостовой рекурсии)

ну так напиши сразу цикл

проблемесы?

но зачем

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

проблемесы?

да. Я не хочу мучать мозг и пытаться приветси все к циклу, когда я могу описать задачу рекурсивно.

Обход дерева рекурсией выглядит лаконично

да. Я не хочу мучать мозг и пытаться приветси все к циклу, когда я могу описать задачу рекурсивно.

пиши на фшарпе

не мучай мозг)

Вот с одной стороны звучит как хороший лозунг, но вот контекст...

А почему они не сделают нормальную хвостовую рекурсию, раз CLR её уже поддерживает?

Обход дерева рекурсией выглядит лаконично

мне кажется это будет уже не хвостовая рекусрия

мне кажется это будет уже не хвостовая рекусрия

Обойти можно и хвостовой

Обойти можно и хвостовой

код можешь написать?

обход в ширину или в глубину?

код можешь написать?

кончено могу, если тебе не надо ничего возвращать, а найти и применить с сайдэффектом, то можно хвостовой рекурсией

то есть учитывая что нужно внутри функции сделать n вызовов в зависимости от числа листьев? все равно будет хвостовая рекурсия?

я б посмотрел как это без стека работает

Модераторы быстрого реагирования

то есть учитывая что нужно внутри функции сделать n вызовов в зависимости от числа листьев? все равно будет хвостовая рекурсия?

Ну как минимум в случае бинарного дерева используются продолжения. Примеры есть в курсах Сошникова.

я б посмотрел как это без стека работает

не без стека, но переполнения не будет.

type Tree = | Leaf of int | Node of Tree * Tree let rec code (f: int -> unit) (tree:Tree) = match tree with | Leaf x -> f x | Node(t1,t2) -> code f t1 code f t2 let makeTree n = let rec createTree i tree = if i = n then tree else Node(Leaf(i), tree) |> createTree (i + 1) Leaf(10000001) |> createTree 0 [<EntryPoint>] let main argv = let t = makeTree 1000000 code (printfn "%i") t System.Console.ReadKey() |> ignore 0

type Tree = | Leaf of int | Node of Tree * Tree let rec code (f: int -> unit) (tree:Tree) = match tree with | Leaf x -> f x | Node(t1,t2) -> code f t1 code f t2 let makeTree n = let rec createTree i tree = if i = n then tree else Node(Leaf(i), tree) |> createTree (i + 1) Leaf(10000001) |> createTree 0 [<EntryPoint>] let main argv = let t = makeTree 1000000 code (printfn "%i") t System.Console.ReadKey() |> ignore 0

это хак что дерево дибо leaf либо node?

элемент дерева точнее

элемент дерева точнее

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

Круто :)

ну а если будет просто node?

ну а если будет просто node?

не понял

@neftedollar а если пометить как [<Struct>]

type Tree = | Leaf of int | Node of Tree * Tree let rec code (f: int -> unit) (tree:Tree) = match tree with | Leaf x -> f x | Node(t1,t2) -> code f t1 code f t2 let makeTree n = let rec createTree i tree = if i = n then tree else Node(Leaf(i), tree) |> createTree (i + 1) Leaf(10000001) |> createTree 0 [<EntryPoint>] let main argv = let t = makeTree 1000000 code (printfn "%i") t System.Console.ReadKey() |> ignore 0

я похожее на скале гуглил

и там тож были или leaf или branch

не понял

когда tree не атд

@neftedollar а если пометить как [<Struct>]

досчитается проверю.

и в узлах значения

Как написать функционально такой кусок: let a = JsonConvert.DeserializeObject<Types.ApiResponse<'a>>(str, jsonOpts) if a.Ok then a.Result else failwith("Error")

когда tree не атд

тогда болше памяти уйдет. Это же никак не влияет на стек

@neftedollar а если пометить как [<Struct>]

тогджа по ходу не влезет дерево стек.

Как написать функционально такой кусок: let a = JsonConvert.DeserializeObject<Types.ApiResponse<'a>>(str, jsonOpts) if a.Ok then a.Result else failwith("Error")

Или это ок?

тогда болше памяти уйдет. Это же никак не влияет на стек

т.к. дерево в моем случае ссылочный тип

Как написать функционально такой кусок: let a = JsonConvert.DeserializeObject<Types.ApiResponse<'a>>(str, jsonOpts) if a.Ok then a.Result else failwith("Error")

норм

если ошибки там это нормально

если ошибки там это нормально

А вот это уже второй вопрос)

Нормально использовать failwith при ошибке?

Нормально использовать failwith при ошибке?

я бы использовал Option или Result

я бы использовал Option или Result

С Option печально, что ты не получишь информации об ошибке

С Option печально, что ты не получишь информации об ошибке

тогда Result, ее по идее уже в sdk внесли

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

ERROR: S client not available

Result интересно выглядит

там по любому нужен стек будет

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

Наверное, да. Но опять же если надо найти и например напечатать, т.е. Не хранить состояние, то можно и хвостовой

Ну как минимум в случае бинарного дерева используются продолжения. Примеры есть в курсах Сошникова.

Нашёл такой пример на msdn: let private tryParseWith tryParseFunc (s : string) = match (tryParseFunc s) with | true, x -> Ok x | false, _ -> Error ("%s is not capable of being parsed." s) Но ругается на строку Error ...: This value is not a function and cannot be applied

Нашёл такой пример на msdn: let private tryParseWith tryParseFunc (s : string) = match (tryParseFunc s) with | true, x -> Ok x | false, _ -> Error ("%s is not capable of being parsed." s) Но ругается на строку Error ...: This value is not a function and cannot be applied

Не знаю, где ты его нашел, но обязательно напиши им, что они забыли sprintf.

Я думал это фитча Error :)

@irrationality https://gist.github.com/gsomix/520a7c3d5a74c0cf0a5e14442a123531

https://gist.github.com/Dolfik1/81e376988747fe915d095d2962e0c131

Не пойму в чём косяк

IdiomaticDuConverter не умеет вложенности конвертить?

Ошибка на 91 строке: System.InvalidCastException occurred HResult=0x80004002 Message=Недопустимое приведение "System.Int64" к "Program+Types+User". Source=mscorlib StackTrace: at System.Convert.DefaultToType(IConvertible value, Type targetType, IFormatProvider provider) at System.Int64.System.IConvertible.ToType(Type type, IFormatProvider provider) at System.Convert.ChangeType(Object value, Type conversionType, IFormatProvider provider) at System.Convert.ChangeType(Object value, Type conversionType)

@irrationality https://gist.github.com/gsomix/520a7c3d5a74c0cf0a5e14442a123531

ага спс гляну

Может нам как сообществу принести пользу и собрать в одном месте биндинги fable?

Что у тебя работает неправильно?

Угу, через Ж всё работает

Что у тебя работает неправильно?

У меня? :)

Да.

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

И просвечивало ошибки, которых не было

И меня это выбесило :)

В VS15 такой херни не было

В VS15 такой херни не было

Так это известный баг... Меняешь тип редактора в vs на любой другой и обратно. Решается за секунду

@Dolfik VF# Nightly?

Ишшью завел?

Вроде ничего не стоит

Я хз как воспроизвести, просто перезапустил студию, стало ок

Кажется, проблема не катастрофическая.

Но всё равно печально

И ещё печально, что powertools нет