在Visual上调试F#代码时，未处理异常的位置不正确

Question

调试C#代码时，Visual将显示未处理异常的原始位置。

例如，在调试以下代码时，Visual将在第9行抛出未处理的DivideByZeroException。

using System;

namespace ConsoleApplication8
{
    class Program
    {
        static void Func()
        {
            throw new DivideByZeroException(); // line 9
        }

        static void Main(string[] args)
        {
            try { Func(); }
            catch (ArgumentException) { }
        }
    }
}

我想在F#中做同样的事情。下面是我将上述代码翻译成F#的代码。

open System

let f() = raise (new DivideByZeroException()) // line 3

[<EntryPoint>]
let main argv = 
    try 
        f()
    with :? ArgumentException -> () // line 9
    0

当我在Visual上调试此代码时，它会中断未处理的异常并指向第9行，我希望它指向第3行。

我试过Microsoft.FSharp.Core.Operators.reraise，但它并没有改变结果。

编辑

C#调试屏幕捕获

​

​

F#调试屏幕捕获

​

​

为C#生成的IL

​

​

为F#生成的IL

​

​

Answer 1

问题是，当您在对f()的调用中添加try/with语句时，抛出的异常被传播到代码的'main‘块中的那个点。

为了处理函数f()中的异常，如您的C#示例所示，请将try/with移动到f()，如下所示：

let f() = 
 try
   raise (System.DivideByZeroException()) // exception is handled here
   with | InnerError(str) -> printfn "Error1 %s" str

[<EntryPoint>]
let main argv = 
    f()
    0

Answer 2

我看到了同样的问题和提出了一个问题。解决方法是将--generate-filter-blocks添加到项目属性的"Build“页面中的”其他标志“中。