我正在尝试编写一个基本程序,以动态编译和运行F#代码。我正在尝试运行以下代码:
open System
open System.CodeDom.Compiler
open Microsoft.FSharp.Compiler.CodeDom
// Our (very simple) code string consisting of just one function: unit -> string
let codeString =
"module Synthetic.Code\n let syntheticFunction() = \"I've been compiled on the fly!\""
// Assembly path to keep compiled code
let synthAssemblyPath = "synthetic.dll"
let CompileFSharpCode(codeString, synthAssemblyPath) =
use provider = new FSharpCodeProvider()
let options = CompilerParameters([||], synthAssemblyPath)
let result = provider.CompileAssemblyFromSource( options, [|codeString|] )
// If we missed anything, let compiler show us what's the problem
if result.Errors.Count <> 0 then
for i = 0 to result.Errors.Count - 1 do
printfn "%A" (result.Errors.Item(i).ErrorText)
result.Errors.Count = 0
if CompileFSharpCode(codeString, synthAssemblyPath) then
let synthAssembly = Reflection.Assembly.LoadFrom(synthAssemblyPath)
let synthMethod = synthAssembly.GetType("Synthetic.Code").GetMethod("syntheticFunction")
printfn "Success: %A" (synthMethod.Invoke(null, null))
else
failwith "Compilation failed"
我会尽力帮助您翻译中文。以下是需要翻译的内容:
我遇到的问题是以下代码行:
let result = provider.CompileAssemblyFromSource( options, [|codeString|] )
我在哪里遇到了异常:系统找不到指定的文件。
我已经包含了所需的引用Fsharp.compiler.codeDom.dll
和Fsharp.compiler.dll
,但我不确定还有什么其他问题。我正在尝试从Codeplex获取CodeDom
的dll源代码并进行步骤分析,但如果有人能看到我忽略的问题,那将节省我很多麻烦。
谢谢您的时间, -Alper