mirror of
https://github.com/hasura/graphql-engine.git
synced 2024-12-24 16:03:37 +03:00
d4e368324d
PR-URL: https://github.com/hasura/graphql-engine-mono/pull/9526 Co-authored-by: awjchen <13142944+awjchen@users.noreply.github.com> Co-authored-by: paritosh-08 <85472423+paritosh-08@users.noreply.github.com> GitOrigin-RevId: 131739ab8e68165453fd47d1eafcc7957ec6f411
18 lines
317 B
Haskell
18 lines
317 B
Haskell
module Counter
|
|
( tests,
|
|
)
|
|
where
|
|
|
|
import Tasks (incrementCounterWithMultipleWriters)
|
|
import Test.Hspec
|
|
|
|
tests :: Spec
|
|
tests =
|
|
describe "The `Counter` metric" $ do
|
|
it "is thread-safe" test_threads
|
|
|
|
test_threads :: IO ()
|
|
test_threads = do
|
|
result <- incrementCounterWithMultipleWriters
|
|
result `seq` pure ()
|