mirror of
https://github.com/tensorflow/haskell.git
synced 2024-06-02 19:13:34 +02:00
Lint
This commit is contained in:
parent
65106465e1
commit
ff5f2cb2d6
|
@ -35,7 +35,7 @@ testTracing = do
|
|||
-- Verifies that tracing happens as a side-effect of graph extension.
|
||||
loggedValue <- newEmptyMVar
|
||||
TF.runSessionWithOptions
|
||||
(def & TF.sessionTracer .~ (putMVar loggedValue))
|
||||
(def & TF.sessionTracer .~ putMVar loggedValue)
|
||||
(TF.buildAnd TF.run_ (pure (TF.scalar (0 :: Float))))
|
||||
tryReadMVar loggedValue >>=
|
||||
maybe (assertFailure "Logging never happened") expectedFormat
|
||||
|
|
Loading…
Reference in New Issue
Block a user