Skip to content

Commit 15bd640

Browse files
authored
Update kernel test code
1 parent 1af88f1 commit 15bd640

File tree

1 file changed

+21
-26
lines changed

1 file changed

+21
-26
lines changed

Sources/Tests/InteractiveWrapperUnitTests/HtmlOutput.fs

Lines changed: 21 additions & 26 deletions
Original file line numberDiff line numberDiff line change
@@ -82,7 +82,6 @@ let ``Latex with magic EInteger`` () =
8282
let output = entity.ToDisplayString("text/plain")
8383
Assert.Equal("2", output)
8484

85-
8685
[<Fact(Skip = "Not working in the embedded kernel")>]
8786
let ``Latex formatter automatically applied in Interactive`` () =
8887

@@ -95,28 +94,24 @@ let ``Latex formatter automatically applied in Interactive`` () =
9594
let r = "#r \"nuget:AngouriMath.Interactive, *-*\""
9695
let code = "open Core\nparsed \"x / 2\""
9796

98-
using ((new FSharpKernel())
99-
.UseNugetDirective()
100-
.UseKernelHelpers().UseDefaultNamespaces()) (fun kernel ->
101-
async {
102-
// Execute #i magic command and see for no errors
103-
let! after_i = kernel.SendAsync(SubmitCode(i), System.Threading.CancellationToken.None) |> Async.AwaitTask
104-
after_i.KernelEvents.Subscribe(fun ev -> Assert.False(ev :? CommandFailed, "After i: " + ev.ToDisplayString())) |> ignore
105-
106-
// Execute #r magic command and see for no errors
107-
let! after_r = kernel.SendAsync(SubmitCode(r), System.Threading.CancellationToken.None) |> Async.AwaitTask
108-
after_r.KernelEvents.Subscribe(fun ev -> Assert.False(ev :? CommandFailed, "After r: " + ev.ToDisplayString())) |> ignore
109-
110-
// Execute our code and find the right LaTeX code
111-
let! res = kernel.SendAsync(SubmitCode(code), System.Threading.CancellationToken.None) |> Async.AwaitTask
112-
let mutable displayValueReceived = false
113-
res.KernelEvents.Subscribe(fun ev ->
114-
match ev with
115-
| :? DisplayEvent as dp ->
116-
Assert.Contains("<script id='MathJax-script'", dp.FormattedValues.First().ToDisplayString())
117-
displayValueReceived <- true
118-
| _ -> ()
119-
) |> ignore
120-
Assert.True(displayValueReceived, "No display value was received")
121-
}
122-
)
97+
task {
98+
use kernel = (new FSharpKernel()).UseKernelHelpers()
99+
// Execute #i magic command and look for no errors
100+
let! after_i = kernel.SendAsync(SubmitCode(i), System.Threading.CancellationToken.None)
101+
Assert.All(after_i.Events, fun ev -> Assert.False(ev :? CommandFailed, "After i: " + ev.ToDisplayString())) |> ignore
102+
103+
// Execute #r magic command and look for no errors
104+
let! after_r = kernel.SendAsync(SubmitCode(r), System.Threading.CancellationToken.None)
105+
Assert.All(after_r.Events, fun ev -> Assert.False(ev :? CommandFailed, "After r: " + ev.ToDisplayString())) |> ignore
106+
107+
// Execute our code and find the right LaTeX code
108+
let! res = kernel.SendAsync(SubmitCode(code), System.Threading.CancellationToken.None)
109+
let mutable displayValueReceived = false
110+
Assert.All(res.Events, fun ev ->
111+
match ev with
112+
| :? DisplayEvent as dp ->
113+
Assert.Contains("<script id='MathJax-script'", dp.FormattedValues.First().ToDisplayString())
114+
displayValueReceived <- true
115+
| _ -> ()) |> ignore
116+
Assert.True(displayValueReceived, "No display value was received")
117+
}

0 commit comments

Comments
 (0)