@@ -1,7 +1,6 @@
11{-# OPTIONS_GHC -Wall #-}
22module Elm.Utils
3− ( (|>), (<|)
4− , drawCycle
3+ ( drawCycle
54 , nearbyNames
65 , Entry(..)
76 , parseEntry
@@ -12,25 +11,3 @@ module Elm.Utils
1211import Parse.Repl (Entry(..), parseEntry)
1312import Reporting.Helpers (drawCycle, nearbyNames)
1413
15−
16−
17−-- PIPES
18−
19−
20−{-| Forward function application `x |> f == f x`. This function is useful
21−for avoiding parenthesis and writing code in a more natural way.
22−-}
23−(|>) :: a -> (a -> b) -> b
24−x |> f = f x
25−
26−
27−{-| Backward function application `f <| x == f x`. This function is useful for
28−avoiding parenthesis.
29−-}
30−(<|) :: (a -> b) -> a -> b
31−f <| x = f x
32−
33−
34−infixr 0 <|
35−infixl 0 |>
36−