Сравнение Nemerle и F # для функциональных в .Net

Я мало знаю о Nemerle, но Я думаю, что одной из его больших особенностей являются макросы (а-ля гигиеничные макросы, подобные Scheme, в отличие от уродливых макросов, подобных C). Я никогда не понимал, почему люди так любят макросы, но опять же, я никогда не понимал, почему людям так нравятся алгебраические типы данных и сопоставление с образцом, пока я не начал использовать F#. Так что я подозреваю, что если вы любите макросы и используете .NET, то вы ярый поклонник Nemerle.

Я коснулся обоих этих языков, и мои впечатления от Nemerle вкратце следующие:(Я предполагаю, что большая часть аудитории знакома с F#, а Nemerle менее популярен, поэтому для Справедливости ради расскажу подробнее):

• Сообщество F# достаточно большое и постоянно растет за счет большого количества постов в блогах, статей и т.д. Также оно разбросано по странам. Наоборот, энтузиасты Nemerle в основном русскоязычны и сосредоточены на сайте RSDN.ru.
• Синтаксис Nemerle IMO намного удобнее для разработчиков, имеющих опыт работы с C-подобными языками.
• Nemerle (как и F#) имеет функции вывода типов. Механизм вывода типов в Nemerle привязан к телу метода (локальные функции, переменные и т. д.), в отличие от глобальной области вывода типов F#. Однако компилятор Nemerle не применяет какие-либо определенные идиомы написания кода для поддержки механизма вывода типов.

F#

open System.Text

let l = [1; 2; 3]
let r1 = l |> List.fold(fun (sb : StringBuilder) v -> sb.Append(v).AppendLine()) (StringBuilder()) // type annotation is required on the function argument
let r2 = (StringBuilder(), l) ||> List.fold(fun sb v -> sb.Append(v).AppendLine()) //here compiler can infer type of State parameter 

Nemerle

using System.Console; 
using System.Collections.Generic; 
using System.Text; 

def l = [1,2,3]; 
def res = l.FoldLeft(StringBuilder(), (v, acc) => acc.Append(v).AppendLine()); 
WriteLine($"Result:\n$res"); 

def d = Dictionary(); // generic parameters are absent (even placeholders!!!) 
d.Add(1, "!"); 
WriteLine(d.GetType()); // System.Collections.Generic.Dictionary`2[System.Int32,System.String] 

Также вы можете заметить еще одну особенность компилятора Nemerle – он может определять типы из дальнейшего использования. Для вывода типов F# использует подход, основанный на алгоритме Хиндли-Милнера, и пытается вывести наиболее общий тип. Nemerle, напротив, никогда не выводит полиморфные типы и всегда ищет наиболее конкретный тип.

F#

let addInt = (+) 5
let addString = (+) "!!!"

let run f x = f (f x) // ('T -> 'T) -> 'T -> 'T

run addInt 5
run addString "S"

Nemerle в тех же условиях выведет тип run как (int->int) * int -> int.

Более подробную информацию о механизме вывода типов Nemerle можно найти в магистерской диссертации Михала Москаля: Вывод типов с отсрочкой

• Nemerle обладает богатыми возможностями метапрограммирования. Большинство конструкций управления языком, таких как циклы, условные выражения, поддержка LINQ, готовящаяся функция синтаксического анализа, включают исходные коды C# и многое другое — все они создаются с помощью макросов. Пример применения макросов можно найти здесь. Кстати, возможности форматирования строк с синтаксисом $ в приведенном выше примере — это также встроенный макрос.

EDIT: Добавлен немного больший пример

using System.Console;
using System.Collections.Generic;
using System.Text;

variant Expr
{
  | Const { value : double }
  | Var { name : string }
  | Operation { id : string; left : Expr; right : Expr }

  public Eval(operations : Dictionary[string, double*double -> double], context : Dictionary[string, double]) : double
  {
    match(this)
    {
        | Const (value) => value
        | Var(name) => context[name]
        | Operation(id, left, right) => 
            def f = operations[id];
            f(left.Eval(operations, context), right.Eval(operations, context))
    }
  }
}

module Program
{
    public Main() : void
    {
        def expr = 
            Expr.Operation(
                "*",
                Expr.Const(10),
                Expr.Operation(
                "+",
                Expr.Var("n"),
                Expr.Const(5)
                )
            );
        def operations = Dictionary.[string, double * double -> double]();
        operations["+"] = (x, y) => x + y;
        operations["*"] = _ * _;

        def vars = Dictionary();
        vars["n"] = 3.0;

        def result = expr.Eval(operations, vars);
        WriteLine($"Result is $result");
    }
}