Skip to content

Commit

Permalink
Merge pull request #651 from IntersectMBO/mgalazyn/fix/relax-kind-some
Browse files Browse the repository at this point in the history
Make `Some` accept forall k. instead of Type kind
  • Loading branch information
carbolymer authored Oct 9, 2024
2 parents dde0496 + bcda8ba commit 013cce9
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion cardano-api/internal/Cardano/Api/Experimental/Eras.hs
Original file line number Diff line number Diff line change
Expand Up @@ -71,7 +71,7 @@ type family LedgerEra era = (r :: Type) | r -> era where
-- Some era <- pure anyEra
-- obtainCommonConstraints era foo
-- @
data Some (f :: Type -> Type) where
data Some (f :: k -> Type) where
Some
:: forall f a
. (Typeable a, Typeable (f a))
Expand Down

0 comments on commit 013cce9

Please sign in to comment.