roc-lang/roc
1
1
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2024-10-26 18:28:43 +03:00
Code Issues Packages Projects Releases Wiki Activity

Fix repl eval of Str.toDec

Browse Source 
Closes #5169
This commit is contained in:
Ayaz Hafiz 2023-03-21 12:21:37 -04:00
parent 9620f9e0e8
commit 6ea6aef0db
No known key found for this signature in database
GPG Key ID: 0E2A37416A25EF58
2 changed files with 15 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
crates/repl_eval/src/eval.rs
View File

@ -596,6 +596,9 @@ fn addr_to_ast<'a, M: ReplAppMemory>(
F64 => helper!(deref_f64, f64),
}
}
(_, Layout::Builtin(Builtin::Decimal)) => {
helper!(deref_dec, RocDec)
}
(_, Layout::Builtin(Builtin::List(elem_layout))) => {
let elem_addr = mem.deref_usize(addr);
let len = mem.deref_usize(addr + env.target_info.ptr_width() as usize);

12
crates/repl_test/src/tests.rs
View File

@ -1268,3 +1268,15 @@ fn enum_tag_union_in_list() {
r#"[E, F, G, H] : List [E, F, G, H]"#,
);
}
#[test]
fn str_to_dec() {
expect_success(
indoc!(
r#"
Str.toDec "1234.1234"
"#
),
r#"Ok 1234.1234 : Result Dec [InvalidNumStr]"#,
);
}