F#
Портирование C # на F #

POCO которые

Некоторые из самых простых видов классов - POCOs.

// C#
public class Person
{
    public string FirstName { get; set; }
    public string LastName { get; set; }
    public DateTime Birthday { get; set; }
}

В F # 3.0 были введены автоматические свойства, аналогичные авто свойствам C #,

// F#
type Person() = 
    member val FirstName = "" with get, set
    member val LastName = "" with get, set
    member val BirthDay = System.DateTime.Today with get, set

Создание экземпляра либо похоже,

// C#
var person = new Person { FirstName = "Bob", LastName = "Smith", Birthday = DateTime.Today }; 
// F#
let person = new Person(FirstName = "Bob", LastName = "Smith")

Если вы можете использовать неизменяемые значения, тип записи намного более идиоматичен F #.

type Person = { 
    FirstName:string; 
    LastName:string; 
    Birthday:System.DateTime 
} 

И эта запись может быть создана:

let person = { FirstName = "Bob"; LastName = "Smith"; Birthday = System.DateTime.Today }

Записи также могут быть созданы на основе других записей по specifiying существующей записи и добавления with , затем список полей для переопределения:

let formal = { person with FirstName = "Robert" }

Класс Внедрение интерфейса

Классы реализуют интерфейс для соответствия контракту интерфейса. Например, класс C # может реализовать IDisposable ,

public class Resource : IDisposable
{ 
    private MustBeDisposed internalResource;
    
    public Resource() 
    { 
        internalResource = new MustBeDisposed();
    }

    public void Dispose()
    {
        Dispose(true);
        GC.SuppressFinalize(this);
    }

    protected virtual void Dispose(bool disposing){
        if (disposing){
            if (resource != null) internalResource.Dispose();
        }
    }
}

Чтобы реализовать интерфейс в F #, используйте interface в определении типа,

type Resource() = 
    let internalResource = new MustBeDisposed()

    interface IDisposable with
        member this.Dispose(): unit = 
            this.Dispose(true)
            GC.SuppressFinalize(this)

    member __.Dispose disposing = 
        match disposing with 
        | true  -> if (not << isNull) internalResource then internalResource.Dispose()
        | false -> ()