Skip to content

Commit

Permalink
fix a test case
Browse files Browse the repository at this point in the history
  • Loading branch information
larskuhtz committed Jun 13, 2023
1 parent 7f22d7f commit 0dba55d
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion test/Main.hs
Original file line number Diff line number Diff line change
Expand Up @@ -267,7 +267,7 @@ prop_proofInvalidSubject l (NonNegative i) = i < length l
Right x -> x
p' = p { _merkleProofSubject = changeSubject (_merkleProofSubject p) }
changeSubject (MerkleProofSubject (InputNode "a")) = MerkleProofSubject (InputNode "b")
changeSubject _ = MerkleProofSubject (InputNode "b")
changeSubject _ = MerkleProofSubject (InputNode "a")

prop_proofInvalidObjectPath
:: UniqueInputs SHA512t_256
Expand Down

0 comments on commit 0dba55d

Please sign in to comment.