Skip to content

Commit 7aae51a

Browse files
committed
Fix unit tests
1 parent 04b85d6 commit 7aae51a

File tree

2 files changed

+5
-5
lines changed

2 files changed

+5
-5
lines changed

kore/test/Test/Kore/Builtin/InternalBytes.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -712,7 +712,7 @@ test_unparse =
712712
[ testCase "unparse using 8-bit encoding" $ do
713713
let input = asInternal "\x00" :: TermLike RewritingVariableName
714714
actual = (show . unparse) input
715-
expect = "/* T Fn D Sfa Cl */ \\dv{Bytes{}}(\"\\x00\")"
715+
expect = "\\dv{Bytes{}}(\"\\x00\")"
716716
assertEqual "" expect actual
717717
]
718718

kore/test/Test/Kore/Unification/Unifier.hs

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -406,15 +406,15 @@ test_unification =
406406
(UnificationTerm a)
407407
(UnificationTerm dv2)
408408
"Cannot handle Constructor and DomainValue:\n\
409-
\/* T Fn D Sfa Cl */ a{}()\n\
410-
\/* T Fn D Sfa Cl */ \\dv{testSort{}}(/* T Fn D Sfa Cl */ \"dv2\")\n"
409+
\a{}()\n\
410+
\\\dv{testSort{}}(\"dv2\")\n"
411411
, andSimplifyException
412412
"Unmatching domain value + constructor constant"
413413
(UnificationTerm dv1)
414414
(UnificationTerm a)
415415
"Cannot handle DomainValue and Constructor:\n\
416-
\/* T Fn D Sfa Cl */ \\dv{testSort{}}(/* T Fn D Sfa Cl */ \"dv1\")\n\
417-
\/* T Fn D Sfa Cl */ a{}()\n"
416+
\\\dv{testSort{}}(\"dv1\")\n\
417+
\a{}()\n"
418418
, testCase "Unmatching domain value + nonconstructor constant" $
419419
andSimplify
420420
(UnificationTerm dv1)

0 commit comments

Comments
 (0)