@@ -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" ) >]
8786let ``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\n parsed \" 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