Skip to content

Commit

Permalink
Rationalise term types in plutus-benchmark
Browse files Browse the repository at this point in the history
  • Loading branch information
kwxm committed Oct 14, 2021
1 parent 3880026 commit 3852a39
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions plutus-benchmark/nofib/test/Spec.hs
Expand Up @@ -11,7 +11,7 @@ import Test.Tasty
import Test.Tasty.HUnit
import Test.Tasty.QuickCheck

import PlutusBenchmark.Common (NamedDeBruijnTerm, cekResultMatchesHaskellValue)
import PlutusBenchmark.Common (Term, cekResultMatchesHaskellValue)

import qualified PlutusBenchmark.NoFib.Clausify as Clausify
import qualified PlutusBenchmark.NoFib.Knights as Knights
Expand All @@ -25,7 +25,7 @@ import qualified PlutusTx as Tx

-- Unit tests comparing PLC and Haskell computations on given inputs

runAndCheck :: Tx.Lift DefaultUni a => NamedDeBruijnTerm -> a -> IO ()
runAndCheck :: Tx.Lift DefaultUni a => Term -> a -> IO ()
runAndCheck term value = cekResultMatchesHaskellValue term (@?=) value

---------------- Clausify ----------------
Expand Down

0 comments on commit 3852a39

Please sign in to comment.