Sulkta-Coop/agora
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

rename/temp print

Browse source
This commit is contained in:
Seungheon Oh 2022-05-25 11:49:43 -05:00
parent fa77b809b8
commit 32f6db5a66
No known key found for this signature in database
GPG key ID: 9B0E12D357369B66
3 changed files with 13 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

14
agora-bench/Bench.hs
View file

@ -18,7 +18,7 @@ import Plutus.V1.Ledger.Api (
) )
import Plutus.V1.Ledger.Api qualified as Plutus import Plutus.V1.Ledger.Api qualified as Plutus
import Spec.Spec ( import Spec.Specification (
Specification (Specification), Specification (Specification),
SpecificationExpectation (Success), SpecificationExpectation (Success),
SpecificationTree (..), SpecificationTree (..),
@ -30,11 +30,11 @@ import Spec.Spec (
data Benchmark = Benchmark data Benchmark = Benchmark
{ name :: Text { name :: Text
-- ^ Human readable name describing script. -- ^ Human readable name describing script.
, bCPUBudget :: ExCPU , cpuBudget :: ExCPU
-- ^ The on-chain execution cost of a script. -- ^ The on-chain execution cost of a script.
, bMemoryBudget :: ExMemory , memoryBudget :: ExMemory
-- ^ The on-chain memory budget of a script. -- ^ The on-chain memory budget of a script.
, bScriptSize :: Int , scriptSize :: Int
-- ^ The on-chain size of a script. -- ^ The on-chain size of a script.
} }
deriving stock (Show, Eq, Ord, Generic) deriving stock (Show, Eq, Ord, Generic)
@ -43,9 +43,9 @@ instance ToNamedRecord Benchmark where
toNamedRecord (Benchmark {..}) = toNamedRecord (Benchmark {..}) =
namedRecord namedRecord
[ "name" .= name [ "name" .= name
, "cpu" .= bCPUBudget , "cpu" .= cpuBudget
, "mem" .= bMemoryBudget , "mem" .= memoryBudget
, "size" .= bScriptSize , "size" .= scriptSize
] ]
instance DefaultOrdered Benchmark where instance DefaultOrdered Benchmark where

7
agora-bench/Main.hs
View file

@ -9,7 +9,7 @@ import Spec.Effect.GovernorMutation qualified as GovernorMutation
import Spec.Effect.TreasuryWithdrawal qualified as TreasuryWithdrawal import Spec.Effect.TreasuryWithdrawal qualified as TreasuryWithdrawal
import Spec.Governor qualified as Governor import Spec.Governor qualified as Governor
import Spec.Proposal qualified as Proposal import Spec.Proposal qualified as Proposal
import Spec.Spec (group) import Spec.Specification (group)
import Spec.Stake qualified as Stake import Spec.Stake qualified as Stake
import Spec.Treasury qualified as Treasury import Spec.Treasury qualified as Treasury
import Prelude import Prelude
@ -20,6 +20,11 @@ main :: IO ()
main = do main = do
I.writeFile "bench.csv" $ I.writeFile "bench.csv" $
(decodeUtf8 . encodeDefaultOrderedByName) $ (decodeUtf8 . encodeDefaultOrderedByName) $
res
mapM_ print res
where
res =
specificationTreeToBenchmarks $ specificationTreeToBenchmarks $
group group
"Benchmark" "Benchmark"

1
bench.json
View file

@ -1 +0,0 @@
[{"cpu":340268715,"mem":724428,"name":"Benchmark/Effects/Treasury Withdrawal Effect/effect/Simple","size":3050},{"cpu":570029812,"mem":1211300,"name":"Benchmark/Effects/Treasury Withdrawal Effect/effect/Simple with multiple treasuries ","size":3377},{"cpu":502351827,"mem":1071087,"name":"Benchmark/Effects/Treasury Withdrawal Effect/effect/Mixed Assets","size":3242},{"cpu":103054094,"mem":227264,"name":"Benchmark/Effects/Governor Mutation Effect/validator/valid new governor datum/governor validator should pass","size":7467},{"cpu":126696096,"mem":263635,"name":"Benchmark/Effects/Governor Mutation Effect/validator/valid new governor datum/effect validator should pass","size":3293},{"cpu":147898986,"mem":329450,"name":"Benchmark/Stake/policy/stakeCreation","size":2265},{"cpu":261845190,"mem":576377,"name":"Benchmark/Stake/validator/stakeDepositWithdraw deposit","size":3829},{"cpu":261845190,"mem":576377,"name":"Benchmark/Stake/validator/stakeDepositWithdraw withdraw","size":3821},{"cpu":34571405,"mem":70066,"name":"Benchmark/Proposal/policy/proposalCreation","size":1549},{"cpu":242652509,"mem":511783,"name":"Benchmark/Proposal/validator/cosignature/proposal","size":5247},{"cpu":183513647,"mem":395070,"name":"Benchmark/Proposal/validator/cosignature/stake","size":4366},{"cpu":240358004,"mem":492704,"name":"Benchmark/Proposal/validator/voting/proposal","size":5255},{"cpu":154841851,"mem":329311,"name":"Benchmark/Proposal/validator/voting/stake","size":4419},{"cpu":25177457,"mem":55883,"name":"Benchmark/AuthorityToken/singleAuthorityTokenBurned/Correct simple","size":806},{"cpu":40266637,"mem":88241,"name":"Benchmark/AuthorityToken/singleAuthorityTokenBurned/Correct many inputs","size":900},{"cpu":37343572,"mem":79744,"name":"Benchmark/Treasury/Validator/Positive/Allows for effect changes","size":1841},{"cpu":25177457,"mem":55883,"name":"Benchmark/AuthorityToken/singleAuthorityTokenBurned/Correct simple","size":806},{"cpu":40266637,"mem":88241,"name":"Benchmark/AuthorityToken/singleAuthorityTokenBurned/Correct many inputs","size":900},{"cpu":57648280,"mem":119961,"name":"Benchmark/Governor/policy/GST minting","size":1836},{"cpu":309839049,"mem":649395,"name":"Benchmark/Governor/validator/proposal creation","size":7994},{"cpu":429394828,"mem":928681,"name":"Benchmark/Governor/validator/GATs minting","size":8113},{"cpu":100243054,"mem":221538,"name":"Benchmark/Governor/validator/mutate governor state","size":7540}]