unison/unison-src/transcripts/fix2353.md
Travis Staton f545ef2213
fix2353 kind inference update
Add g to constructor to avoid kind defaulting
2023-09-20 15:37:10 -04:00

379 B

.> builtins.merge
use builtin Scope
unique ability Async t g where async : {g} Nat
unique ability Exception where raise : Nat -> x

pure.run : a -> (forall t . '{Async t g} a) ->{Exception, g} a
pure.run a0 a =
  a' : forall s . '{Scope s, Exception, g} a
  a' = 'a0 -- typechecks
  -- make sure this builtin can still be referenced
  Scope.run a'