7b21980f88ef738dc5bd4c9e2e458b53c49a8dd1056363e17c8efd861a99a5fb

Download raw

Created: 2023-12-19 03:40:10.302489 UTC

Size: 1398

Preview (limited to 512 bytes)

"{-# LANGUAGE BangPatterns #-}\n{-# LANGUAGE ScopedTypeVariables #-}\n\nmodule PrimArray.Compare\n ( benchmarkLt\n , benchmarkLtDef\n , benchmarkLte\n , benchmarkLteDef\n , argumentA\n , argumentB\n ) where\n\nimport Data.Primitive\nimport Data.Word\nimport Control.Monad\nimport Control.Monad.ST (runST)\nimport GHC.Exts (fromList)\n\nbenchmarkLtDef :: PrimArray Int -> PrimArray Int -> Bool\nbenchmarkLtDef a b = case compare a b of\n LT -> True\n _ -> False\n\nbenchmarkLteDef :: PrimArray Int -> PrimArray Int -> Bool\nbench"

Casa is a service provided by the Haskell Foundation │ Originally developed by FP Complete