mirror of
https://github.com/roc-lang/roc.git
synced 2025-08-04 04:08:19 +00:00
11 lines
288 B
Text
11 lines
288 B
Text
app "test" provides [tforever] to "./platform"
|
|
|
|
Effect a := {} -> a
|
|
|
|
eforever : Effect a -> Effect b
|
|
|
|
OtherTask a err : Effect (Result a err)
|
|
|
|
tforever : OtherTask val err -> OtherTask * *
|
|
tforever = \task -> eforever task
|
|
#^^^^^^^^{-1} OtherTask val err -[[tforever(0)]]-> OtherTask * *
|