F # Эквивалент Деструктора - PullRequest
Новая
       13

F # Эквивалент Деструктора

12 голосов
/ 15 апреля 2011

Я перевожу класс C #, который упаковывает неуправляемую библиотеку, в F #. Я столкнулся с кажущейся простой проблемой переписывания следующего деструктора. 

class Wrapper {

    // P/Invoke ellided

    private SomeType x;

    public Wrapper() {
        x = new SomeType();
        Begin();
    }

    public ~Wrapper() {
        End();
    }

Упрощенный код F #, который у меня есть на данный момент, выглядит следующим образом: 

type Wrapper() =
  [<Literal>]
  static let wrappedDll = "Library.dll"

  [<DllImport(wrappedDll , EntryPoint = "Begin")>]
  static extern void Begin()

  [<DllImport(wrappedDll , EntryPoint = "End")>]
  static extern void End()

  let x = new SomeType()

  do
    Begin()

Как я могу изменить этот код F # для того же поведения? Мой поиск по F # деструктору не дал результатов ни в моих книгах, ни в Интернете.

Спасибо.

Ответы [ 2 ]

18 голосов
/ 15 апреля 2011

Вы пытались найти F # финализатор? 

override x.Finalize() = ...
10 голосов
/ 04 февраля 2012 
namespace FSharp.Library  

type MyClass() as self = 

    let mutable disposed = false;

    // TODO define your variables including disposable objects

    do // TODO perform initialization code
        ()

    // internal method to cleanup resources
    let cleanup(disposing:bool) = 
        if not disposed then
            disposed <- true

            if disposing then
                // TODO dispose of managed resources
                ()

            // TODO cleanup unmanaged resources
            ()

    // implementation of IDisposable
    interface IDisposable with
        member self.Dispose() =
            cleanup(true)
            GC.SuppressFinalize(self)

    // override of finalizer
    override self.Finalize() = 
        cleanup(false)

Шаблон библиотеки классов F #

http://blogs.msdn.com/b/mcsuksoldev/archive/2011/06/05/f-class-library-template.aspx

...