Skip to content

Commit 77b99da

Browse files
committed
restoring pointfree style
1 parent b296540 commit 77b99da

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

kore/src/Kore/Equation/Simplification.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -105,8 +105,8 @@ simplifyEquation equation =
105105
where
106106
argument' =
107107
fromMaybe Predicate.makeTruePredicate argument
108-
returnOriginalIfAborted xs =
109-
fmap (either (: []) id) (runExceptT xs)
108+
returnOriginalIfAborted =
109+
fmap (either (: []) id) . runExceptT
110110
Equation
111111
{ requires
112112
, argument

0 commit comments

Comments
 (0)