на него навесили CompiledName?
***
Там оказывается дополнительный атрибут добавляется.
module SomeModule =
[<CompiledName "name for our enemy">]
let ourName x = x + 2
match <@ SomeModule.ourName @> with
| Lambda (_, (Call (_, p, _))) ->
p.GetCustomAttributes(false)
|> Seq.tryPick (function
| :? CompilationSourceNameAttribute as p ->
Some p.SourceName
| _ -> None
)
, p.Name
|> (=) (Some "ourName", "name for our enemy")
// Нашел.
Обсуждают сегодня