mirror of
https://github.com/roc-lang/roc.git
synced 2025-10-03 00:24:34 +00:00
parent
32814cbb37
commit
7306e131b9
1 changed files with 21 additions and 0 deletions
|
@ -6384,4 +6384,25 @@ mod solve_expr {
|
|||
],
|
||||
)
|
||||
}
|
||||
|
||||
#[test]
|
||||
fn task_wildcard_wildcard() {
|
||||
infer_eq_without_problem(
|
||||
indoc!(
|
||||
r#"
|
||||
app "test" provides [ tforever ] to "./platform"
|
||||
|
||||
Effect a := {} -> a
|
||||
|
||||
eforever : Effect a -> Effect b
|
||||
|
||||
Task a err : Effect (Result a err)
|
||||
|
||||
tforever : Task val err -> Task * *
|
||||
tforever = \task -> eforever task
|
||||
"#
|
||||
),
|
||||
"Task val err -> Task * *",
|
||||
);
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue