language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-10-05 01:20:20 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

add tests

Browse source
This commit is contained in:
Folkert 2021-03-27 21:28:56 +01:00
parent fed470b316
commit 5f72983c82
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
compiler/test_gen/src/gen_list.rs
View file

@ -1760,6 +1760,13 @@ fn list_sum() {
assert_evals_to!("List.sum [ 1.1, 2.2, 3.3 ]", 6.6, f64); assert_evals_to!("List.sum [ 1.1, 2.2, 3.3 ]", 6.6, f64);
} }
#[test]
fn list_product() {
assert_evals_to!("List.product []", 1, i64);
assert_evals_to!("List.product [ 1, 2, 3 ]", 6, i64);
assert_evals_to!("List.product [ 1.1, 2.2, 3.3 ]", 1.1 * 2.2 * 3.3, f64);
}
#[test] #[test]
fn list_keep_oks() { fn list_keep_oks() {
assert_evals_to!("List.keepOks [] (\\x -> x)", 0, i64); assert_evals_to!("List.keepOks [] (\\x -> x)", 0, i64);