mirror of
https://github.com/roc-lang/roc.git
synced 2025-08-04 12:18:19 +00:00
Correct tag ID matching of nullable wrapped tags
This commit is contained in:
parent
bbcd9c3a52
commit
5abf121efe
2 changed files with 38 additions and 2 deletions
|
@ -2189,3 +2189,34 @@ fn issue_5162_recast_nested_nullable_unwrapped_layout() {
|
|||
bool
|
||||
);
|
||||
}
|
||||
|
||||
#[test]
|
||||
#[cfg(any(feature = "gen-llvm"))]
|
||||
fn nullable_wrapped_eq_issue_5434() {
|
||||
assert_evals_to!(
|
||||
indoc!(
|
||||
r###"
|
||||
app "test" provides [main] to "./platform"
|
||||
|
||||
Value : [
|
||||
A,
|
||||
B I64,
|
||||
C,
|
||||
D (List [T Str Value]),
|
||||
]
|
||||
|
||||
main =
|
||||
x : Value
|
||||
x = B 32
|
||||
y : Value
|
||||
y = B 0
|
||||
if x == y then
|
||||
"OK"
|
||||
else
|
||||
"FAIL"
|
||||
"###
|
||||
),
|
||||
RocStr::from("FAIL"),
|
||||
RocStr
|
||||
);
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue