roc/crates/compiler/uitest/tests/solve/opaque_and_alias_unify.txt
2023-04-20 16:18:23 -05:00

9 lines
203 B
Text

app "test" provides [always] to "./platform"
Effect a := {} -> a
Task a err : Effect (Result a err)
always : a -> Task a *
always = \x -> @Effect (\{} -> Ok x)
#^^^^^^{-1} a -[[always(0)]]-> Task a *