Skip to content

Commit

Permalink
fix tests
Browse files Browse the repository at this point in the history
  • Loading branch information
bristermitten committed Dec 7, 2023
1 parent 04fc1f2 commit 3c4eaff
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions test/Util.hs
Original file line number Diff line number Diff line change
Expand Up @@ -9,11 +9,13 @@ import JVM.Data.Convert.Instruction (convertInstructions, fullyRunCodeConverter)
import JVM.Data.Convert.Monad (runConvertM)
import JVM.Data.Raw.Instruction qualified as Raw
import Test.Hspec (HasCallStack)
import Polysemy

runConv :: (MonadTest m) => [Abs.Instruction] -> m ([Raw.Instruction], ConstantPoolState)
runConv =
withFrozenCallStack $
shouldBeRight
. run
. runConvertM
. fullyRunCodeConverter
. convertInstructions
Expand Down

0 comments on commit 3c4eaff

Please sign in to comment.