在F#中获取引用的程序集

dem*_*tos 2 assembly lambda f#

我试图通过迭代加载引用的程序集.
我加载程序集,并通过getRefs获取引用的程序集.getRefs没有任何输入参数所以它应该是val getRefs:Assembly-> AssemblyName [],但认为它是unit-> AssemblyName [],有什么想法吗?


let getreffiles (name:string) =
     let loadAssembly (name:string)=  
         Assembly.Load(name)  
     let getRefs (assembly:Assembly)=  
        assembly.GetReferencedAssemblies  
     //Get the referenced assembly list and print the full name to console  
     name  
     |>loadAssembly  
     |>getRefs   
     |>List.iter (fun s -> 
           printfn "Referenced Assembly name %s  types" s.FullName);;  
Run Code Online (Sandbox Code Playgroud)

Type mismatch. Expecting a (unit -> AssemblyName []) -> 'a  but given a  'b list -> unit     
The type 'unit -> AssemblyName []' does not match the type ''a list'    
C:\Users\Ebru\Documents\Visual Studio 2010\Projects\Find\GetAssembly.fs 
Run Code Online (Sandbox Code Playgroud)

Dav*_*ton 7

您必须通过在末尾添加()来执行方法GetReferencedAssemblies.在不添加"()"的情况下,您只需返回对函数的引用,而不是返回函数的结果.另外,将List.iter更改为Array.iter.GetReferencedAssemblies返回和数组,而不是列表.

let getreffiles (name:string) =
     let loadAssembly (name:string)=  
         Assembly.Load(name)  
     let getRefs (assembly:Assembly)=  
        assembly.GetReferencedAssemblies()
     //Get the referenced assembly list and print the full name to console  
     name  
     |>loadAssembly  
     |>getRefs   
     |> Array.iter (fun s -> 
           printfn "Referenced Assembly name %s  types" s.FullName);;  
Run Code Online (Sandbox Code Playgroud)