fix comments/warnings

This commit is contained in:
Folkert 2020-09-08 14:18:55 +02:00
parent 77eb20f9ce
commit ad8e9db896
3 changed files with 4 additions and 13 deletions

View file

@ -1,4 +1,4 @@
use roc_collections::all::{MutMap, MutSet}; use roc_collections::all::MutSet;
use roc_types::subs::Subs; use roc_types::subs::Subs;
pub fn helper_without_uniqueness<'a>( pub fn helper_without_uniqueness<'a>(

View file

@ -2220,7 +2220,7 @@ mod solve_uniq_expr {
} }
#[test] #[test]
fn list_walkRight_sum() { fn list_walk_right_sum() {
infer_eq( infer_eq(
indoc!( indoc!(
r#" r#"
@ -2290,14 +2290,6 @@ mod solve_uniq_expr {
); );
} }
#[test]
fn list_walkRight() {
infer_eq(
"List.walkRight",
"Attr * (Attr (* | b) (List (Attr b a)), Attr Shared (Attr b a, c -> c), c -> c)",
);
}
#[test] #[test]
fn list_push_singleton() { fn list_push_singleton() {
infer_eq( infer_eq(
@ -2313,7 +2305,7 @@ mod solve_uniq_expr {
} }
#[test] #[test]
fn list_walkRight_reverse() { fn list_walk_right_reverse() {
infer_eq( infer_eq(
indoc!( indoc!(
r#" r#"

View file

@ -644,7 +644,6 @@ fn unify_shared_tags(
}; };
if problems.is_empty() { if problems.is_empty() {
// debug_assert_eq!(subs.get_root_key(actual), subs.get_root_key(expected));
matching_vars.push(actual); matching_vars.push(actual);
} }
} }
@ -737,7 +736,7 @@ fn unify_flat_type(
} }
(RecursiveTagUnion(recursion_var, tags1, ext1), TagUnion(tags2, ext2)) => { (RecursiveTagUnion(recursion_var, tags1, ext1), TagUnion(tags2, ext2)) => {
// unreachable!("unify of recursive with non-recursive tag union should not occur"); // this never happens in type-correct programs, but may happen if there is a type error
let union1 = gather_tags(subs, tags1.clone(), *ext1); let union1 = gather_tags(subs, tags1.clone(), *ext1);
let union2 = gather_tags(subs, tags2.clone(), *ext2); let union2 = gather_tags(subs, tags2.clone(), *ext2);