Add PlutusV3 conformance tests and also control budgets
There were some odd discrepancy for `integerToByteString` on the mem side. Either 1 or about 1000 mem units off; which I couldn't quite figure out. Yet, it proves useful to validate builtin at large and ensure we have a valid cost model for v3.
This commit is contained in:
@@ -0,0 +1,77 @@
|
||||
(program
|
||||
1.0.0
|
||||
[
|
||||
(lam
|
||||
i0
|
||||
[
|
||||
[
|
||||
(force
|
||||
(force
|
||||
(delay
|
||||
(delay
|
||||
(lam
|
||||
f
|
||||
[
|
||||
(force (delay (lam s [ s s ])))
|
||||
(lam
|
||||
s
|
||||
(lam
|
||||
x [ [ f [ (force (delay (lam s [ s s ]))) s ] ] x ]
|
||||
)
|
||||
)
|
||||
]
|
||||
)
|
||||
)
|
||||
)
|
||||
)
|
||||
)
|
||||
(lam
|
||||
rec
|
||||
(lam
|
||||
i
|
||||
[
|
||||
[
|
||||
[
|
||||
(force
|
||||
(delay
|
||||
(lam
|
||||
b
|
||||
(lam
|
||||
x
|
||||
(lam
|
||||
y
|
||||
[
|
||||
[ [ [ (force (builtin ifThenElse)) b ] x ] y ]
|
||||
(con unit ())
|
||||
]
|
||||
)
|
||||
)
|
||||
)
|
||||
)
|
||||
)
|
||||
[ [ (builtin lessThanEqualsInteger) i ] (con integer 1) ]
|
||||
]
|
||||
(lam u i)
|
||||
]
|
||||
(lam
|
||||
u
|
||||
[
|
||||
[
|
||||
(builtin addInteger)
|
||||
[
|
||||
rec [ [ (builtin subtractInteger) i ] (con integer 1) ]
|
||||
]
|
||||
]
|
||||
[ rec [ [ (builtin subtractInteger) i ] (con integer 2) ] ]
|
||||
]
|
||||
)
|
||||
]
|
||||
)
|
||||
)
|
||||
]
|
||||
i0
|
||||
]
|
||||
)
|
||||
(con integer 0)
|
||||
]
|
||||
)
|
||||
@@ -0,0 +1,2 @@
|
||||
({cpu: 1689053
|
||||
| mem: 6202})
|
||||
@@ -0,0 +1 @@
|
||||
(program 1.0.0 (con integer 0))
|
||||
Reference in New Issue
Block a user