language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-27 13:59:08 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Allow configuring whether can errors are acceptable in tests

Browse source
This commit is contained in:
Ayaz Hafiz 2023-04-12 13:53:39 -05:00
parent 73e5a9ed46
commit b33393ca39
No known key found for this signature in database
GPG key ID: 0E2A37416A25EF58
3 changed files with 62 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

21
crates/compiler/uitest/src/mono.rs
View file

@ -9,6 +9,7 @@ use roc_mono::{
layout::STLayoutInterner,
};
use tempfile::tempdir;
use test_solve_helpers::format_problems;
#[derive(Default)]
pub struct MonoOptions {
@ -20,6 +21,7 @@ pub fn write_compiled_ir<'a>(
test_module: &str,
dependencies: impl IntoIterator<Item = (&'a str, &'a str)>,
options: MonoOptions,
allow_can_errors: bool,
) -> io::Result<()> {
use roc_packaging::cache::RocCacheDir;
use std::path::PathBuf;
@ -70,11 +72,30 @@ pub fn write_compiled_ir<'a>(
exposed_to_host,
mut layout_interner,
interns,
can_problems,
mut type_problems,
sources,
..
} = loaded;
let main_fn_symbol = exposed_to_host.top_level_values.keys().copied().next();
for (module, can_problems) in can_problems.into_iter() {
let type_problems = type_problems.remove(&module).unwrap_or_default();
let source = sources.get(&module).unwrap();
let (can_problems, type_problems) =
format_problems(&source.1, module, &interns, can_problems, type_problems);
if !can_problems.is_empty() && !allow_can_errors {
panic!("Canonicalization problems: {can_problems}");
}
if !type_problems.is_empty() {
panic!("Type problems: {type_problems}");
}
}
if !options.no_check {
check_procedures(arena, &interns, &mut layout_interner, &procedures);
}