Skip to content
Snippets Groups Projects
Commit e923480d authored by Ryan Scott's avatar Ryan Scott
Browse files

Revert "Patch OneTuple to work around ghc/ghc#20562 on HEAD"

This reverts commit 460c708d.
parent 911d481b
No related branches found
No related tags found
No related merge requests found
diff --git a/src/Data/Tuple/OneTuple.hs b/src/Data/Tuple/OneTuple.hs
index 8700132..cb7feb0 100644
--- a/src/Data/Tuple/OneTuple.hs
+++ b/src/Data/Tuple/OneTuple.hs
@@ -21,7 +21,7 @@ import Data.Tuple.Solo
type OneTuple = Solo
only :: OneTuple a -> a
-only = getSolo
+only (Solo x) = x
#if __GLASGOW_HASKELL__ >= 708
#if __GLASGOW_HASKELL__ >= 710
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment