This commit is contained in:
Kevin Ransom (msft) 2019-07-26 15:42:35 -07:00 коммит произвёл GitHub
Родитель ce483c0e01
Коммит 969a9c4661
Не найден ключ, соответствующий данной подписи
Идентификатор ключа GPG: 4AEE18F83AFDEB23
1 изменённых файлов: 4 добавлений и 2 удалений

Просмотреть файл

@ -290,8 +290,10 @@ let main argv = 0"""
Assert.AreEqual(expectedErrorMessage, errorMessage)
)
let ParseWithErrors (source: string) expectedParseErrors =
let parseResults = checker.ParseFile("test.fs", SourceText.ofString source, FSharpParsingOptions.Default) |> Async.RunSynchronously
let ParseWithErrors (source: string) expectedParseErrors =
let sourceFileName = "test.fs"
let parsingOptions = { FSharpParsingOptions.Default with SourceFiles = [| sourceFileName |] }
let parseResults = checker.ParseFile(sourceFileName, SourceText.ofString source, parsingOptions) |> Async.RunSynchronously
Assert.True(parseResults.ParseHadErrors)