mirror of
https://github.com/roc-lang/roc.git
synced 2024-11-11 05:34:11 +03:00
parent
30671b5725
commit
32814cbb37
@ -3474,3 +3474,22 @@ fn list_map2_conslist() {
|
||||
RocStr
|
||||
)
|
||||
}
|
||||
|
||||
#[test]
|
||||
#[cfg(any(feature = "gen-llvm"))]
|
||||
fn polymorphic_lambda_captures_polymorphic_value() {
|
||||
assert_evals_to!(
|
||||
indoc!(
|
||||
r#"
|
||||
x = 2
|
||||
|
||||
f1 = \_ -> x
|
||||
|
||||
f = if True then f1 else f1
|
||||
f {}
|
||||
"#
|
||||
),
|
||||
2,
|
||||
u64
|
||||
)
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user