F # Функция друга/класс

Question

Возможно ли реализовать функцию друга и класс друга (как в C++) в F #?

Update: Поскольку нет друга функции/класса в F #, и друг даже не зарезервированное ключевым слова для будущего расширения, я задаюсь вопросом, есть ли какие-либо проблемы с механизмом друга в F #, которые делают разработчик решить не выполнять его? (such as in "protected" access modifier).

Предложение 1: Brian, файл подписи - Не думаю, что эта штука работает правильно. Если у вас есть замыкание (например, лямбда-выражение в A, который представляет собой другой объект, чем экземпляр A), которые оценивают BX, это не будет работать

Предложение 2: горный массив (+ Mitya0), InternalsVisibleTo - Мне непонятно, вы пишете это во втором классе или выставляете класс для всей сборки?

Answer 1

Обратите внимание, что вы можете использовать файлы подписи, чтобы имитировать друга.

Если вы хотите A быть другим B, так A может получить доступ к внутренности B, что другие не могут видеть, что вы можете сделать, например,

// File1.fs 
type B() = 
    let x = 42 // private field 
    member this.X = x // public getter 

type A() = 
    member this.PeekInto(b : B) = 
     b.X 

но также

// File1.fsi 
type B = 
    new : unit -> B 
    // do not expose X in the signature 

type A = 
    new : unit -> A 
    PeekInto : B -> int 

и теперь A «s реализация может увидеть B.X но продолжение программы не могут видеть B.X.

Файлы подписи являются довольно удивительными для создания произвольных границ инкапсуляции.

Answer 2

Концепция друзей, как она существует в C++, не совсем переводится на F #, но вы можете использовать модификатор доступности internal, чтобы разрешить доступ ко всем классам в той же сборке .NET. Вероятно, это то, что вы ищете.

Answer 3

Из того, что я вижу в документации, есть friend notion in C#,, но такая же документация предполагает, что F # не обладает этой способностью.

Answer 4

Как указал Митя. Просто используйте атрибут InternalsVisibleTo для класса, в котором вы хотите видеть защищенные члены, или на всей сборке. (Я делаю это все время для тестирования модулей).

[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("UnitTestModule")>] 

Работы по уходу.