debug test failure

Author: dsyme

tests/service/ProjectAnalysisTests.fs

@@ -3627,7 +3627,7 @@ let _ = XmlProvider<"<root><value>1</value><value>3</value></root>">.GetSample()
 let ``Test Project25 whole project errors`` () = 
     let wholeProjectResults = checker.ParseAndCheckProject(Project25.options) |> Async.RunSynchronously
     for e in wholeProjectResults.Errors do 
-        printfn "Project25 error: %A" e
+        printfn "Project25 error: <<<%s>>>" e.Message
     wholeProjectResults.Errors.Length |> shouldEqual 0
 
 [<Test>]