mirror of
https://github.com/hasura/graphql-engine.git
synced 2024-12-18 13:02:11 +03:00
11a454c2d6
This commit applies ormolu to the whole Haskell code base by running `make format`. For in-flight branches, simply merging changes from `main` will result in merge conflicts. To avoid this, update your branch using the following instructions. Replace `<format-commit>` by the hash of *this* commit. $ git checkout my-feature-branch $ git merge <format-commit>^ # and resolve conflicts normally $ make format $ git commit -a -m "reformat with ormolu" $ git merge -s ours post-ormolu https://github.com/hasura/graphql-engine-mono/pull/2404 GitOrigin-RevId: 75049f5c12f430c615eafb4c6b8e83e371e01c8e
23 lines
473 B
Haskell
23 lines
473 B
Haskell
module Data.Tuple.Extended
|
|
( module Data.Tuple,
|
|
curry3,
|
|
curry4,
|
|
uncurry3,
|
|
uncurry4,
|
|
)
|
|
where
|
|
|
|
import Data.Tuple
|
|
|
|
curry3 :: ((a, b, c) -> d) -> a -> b -> c -> d
|
|
curry3 f a b c = f (a, b, c)
|
|
|
|
curry4 :: ((a, b, c, d) -> e) -> a -> b -> c -> d -> e
|
|
curry4 f a b c d = f (a, b, c, d)
|
|
|
|
uncurry3 :: (a -> b -> c -> d) -> (a, b, c) -> d
|
|
uncurry3 f (a, b, c) = f a b c
|
|
|
|
uncurry4 :: (a -> b -> c -> d -> e) -> (a, b, c, d) -> e
|
|
uncurry4 f (a, b, c, d) = f a b c d
|