@@ -27,6 +27,7 @@ of `InteractiveChecker`:
2727
2828open System
2929open FSharp.Compiler .SourceCodeServices
30+ open FSharp.Compiler .Text
3031
3132// Create an interactive checker instance
3233let checker = FSharpChecker.Create()
@@ -53,7 +54,7 @@ let inputLines = input.Split('\n')
5354let file = " /home/user/Test.fsx"
5455
5556let projOptions , errors =
56- checker.GetProjectOptionsFromScript( file, input)
57+ checker.GetProjectOptionsFromScript( file, SourceText.ofString input)
5758 |> Async.RunSynchronously
5859
5960let parsingOptions , _errors = checker.GetParsingOptionsFromProjectOptions( projOptions)
@@ -68,7 +69,7 @@ together.
6869// Perform parsing
6970
7071let parseFileResults =
71- checker.ParseFile( file, input, parsingOptions)
72+ checker.ParseFile( file, SourceText.ofString input, parsingOptions)
7273 |> Async.RunSynchronously
7374(**
7475Before we look at the interesting operations provided by `TypeCheckResults`, we
@@ -78,15 +79,15 @@ result (but it may contain incorrectly "guessed" results).
7879
7980// Perform type checking
8081let checkFileAnswer =
81- checker.CheckFileInProject( parseFileResults, file, 0 , input, projOptions)
82+ checker.CheckFileInProject( parseFileResults, file, 0 , SourceText.ofString input, projOptions)
8283 |> Async.RunSynchronously
8384
8485(**
8586Alternatively you can use `ParseAndCheckFileInProject` to check both in one step:
8687*)
8788
8889let parseResults2 , checkFileAnswer2 =
89- checker.ParseAndCheckFileInProject( file, 0 , input, projOptions)
90+ checker.ParseAndCheckFileInProject( file, 0 , SourceText.ofString input, projOptions)
9091 |> Async.RunSynchronously
9192
9293(**
0 commit comments