atomic-primops-0.5.0.2: testing/CounterReference.hs

{-# LANGUAGE CPP, BangPatterns #-}
module CounterReference (tests) where
import qualified Data.Atomics.Counter.Reference as C

#include "CounterCommon.hs"

name = "Reference"

-- This version is much slower than some of the others:
default_seq_tries  = 10 * base 
default_conc_tries = base

base = numElems `quot` 15