Skip to content

Commit 2eb6922

Browse files
committed
Add roles declarations to allow safe coercions
1 parent cfa7682 commit 2eb6922

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

src/Data/Exists.purs

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -26,6 +26,8 @@ import Unsafe.Coerce (unsafeCoerce)
2626
-- | ```
2727
foreign import data Exists :: (Type -> Type) -> Type
2828

29+
type role Exists representational
30+
2931
-- | The `mkExists` function is used to introduce a value of type `Exists f`, by providing a value of
3032
-- | type `f a`, for some type `a` which will be hidden in the existentially-quantified type.
3133
-- |

0 commit comments

Comments
 (0)