从FSharp.Compiler.Service嵌入F#Interactive Example Throwing Exception

时间:2016-01-18 15:40:27

标签: f# f#-interactive

我正在处理来自http://fsharp.github.io/FSharp.Compiler.Service/interactive.html的嵌入F#Interactive示例,但我遇到了以下行引发异常的问题:

let fsiSession = FsiEvaluationSession.Create(fsiConfig, allArgs, inStream, outStream, errStream)

抛出的异常是:

“FSharp.Compiler.Service.dll中发生了'System.Exception'类型的未处理异常 附加信息:创建评估会话时出错:StopProcessing null“

我的项目正在从VS2015 Enterprise Update 1运行,设置为一个简单的F#控制台应用程序,目标F#运行时为F#4.0,目标框架为4.6。从nuget下载的FSharp.Compiler.Service版本是2.0.0.2。

我正在运行的Program.Fs文件代码在这里(示例的直接端口):

open System
open System.IO
open System.Text
open Microsoft.FSharp.Compiler.SourceCodeServices
open Microsoft.FSharp.Compiler.Interactive.Shell

[<EntryPoint>]
let main argv =

    let sbOut = new StringBuilder()
    let sbErr = new StringBuilder()
    let inStream = new StringReader("")
    let outStream = new StringWriter(sbOut)
    let errStream = new StringWriter(sbErr)

    // Build command line arguments & start FSI session
    let argv = [| "C:\\fsi.exe" |]
    let allArgs = Array.append argv [|"--noninteractive"|]

    let fsiConfig = FsiEvaluationSession.GetDefaultConfiguration()
    let fsiSession = FsiEvaluationSession.Create(fsiConfig, allArgs, inStream, outStream, errStream)

    /// Evaluate expression & return the result
    let evalExpression text =
        match fsiSession.EvalExpression(text) with
        | Some value -> printfn "%A" value.ReflectionValue
        | None -> printfn "Got no result!"

    evalExpression "42+1" // prints '43'

    Console.ReadLine() |> ignore

    0  // return integer

任何想法都会受到赞赏。

1 个答案:

答案 0 :(得分:6)

问题的关键在于Compiler Services: Notes on FSharp.Core.dll

  

如果进行动态编译和执行,您可能还需要   包括FSharp.Core.optdata和FSharp.Core.sigdata,见下文   指导。

构建应用程序时,带有FSharp.Core.dll的输出目录缺少两个文件:

FSharp.Core.optdata  
FSharp.Core.sigdata

您需要找到这两个文件以及与FSharp.Core.dll一致的文件的正确版本,并将它们复制到构建输出目录。

如何使用Visual Studio查找文件

从菜单查看 - &gt; Solution Explorer
展开项目
展开参考文献
右键单击FSharp.Core并选择属性。

enter image description here

完整路径提供至少应包含三个文件的目录。 使用文件资源管理器以完整路径打开目录。

enter image description here

复制两个文件

FSharp.Core.optdata  
FSharp.Core.sigdata

到构建目录。

如何使用Visual Studio

查找构建目录

从菜单查看 - &gt; Solution Explorer
选择项目
按F4打开属性页

enter image description here

使用VS进行调试时,带有\bin\Debug的项目文件夹是默认设置。

更改fsi.exe的位置

现在你有了两个所需的文件,你还需要更改fsi.exe的位置

let argv = [| "C:\\fsi.exe" |]

因为我怀疑fsi.exe是否在C盘的根目录中。