language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-28 14:24:45 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Add simple effectful cli run tests

Browse source
This commit is contained in:
Agus Zubiaga 2024-10-24 12:48:47 -03:00
parent ca7697db91
commit de2260e67a
No known key found for this signature in database
5 changed files with 140 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

90
crates/cli/tests/cli_run.rs
View file

@ -986,6 +986,77 @@ mod cli_run {
);
}
#[test]
#[cfg_attr(windows, ignore)]
fn effectful_hello() {
test_roc_app(
"crates/cli/tests/effectful",
"hello.roc",
&[],
&[],
&[],
indoc!(
r#"
I'm an effect 👻
"#
),
UseValgrind::No,
TestCliCommands::Dev,
);
}
#[test]
#[cfg_attr(windows, ignore)]
fn effectful_form() {
test_roc_app(
"crates/cli/tests/effectful",
"form.roc",
&["Agus\n", "Zubiaga\n", "27\n"],
&[],
&[],
indoc!(
r#"
What's your first name?
What's your last name?
Hi, Agus Zubiaga!
How old are you?
Nice! You can vote!
Bye! 👋
"#
),
UseValgrind::No,
TestCliCommands::Dev,
);
}
#[test]
#[cfg_attr(windows, ignore)]
fn effectful_loops() {
test_roc_app(
"crates/cli/tests/effectful",
"loops.roc",
&[],
&[],
&[],
indoc!(
r#"
Lu
Marce
Joaquin
Chloé
Mati
Pedro
"#
),
UseValgrind::No,
TestCliCommands::Dev,
);
}
#[test]
#[cfg_attr(windows, ignore)]
fn effectful_untyped_passed_fx() {
@ -1007,6 +1078,25 @@ mod cli_run {
);
}
#[test]
#[cfg_attr(windows, ignore)]
fn effectful_ignore_result() {
test_roc_app(
"crates/cli/tests/effectful",
"ignore_result.roc",
&[],
&[],
&[],
indoc!(
r#"
I asked for input and I ignored it. Deal with it! 😎
"#
),
UseValgrind::No,
TestCliCommands::Dev,
);
}
#[test]
#[cfg_attr(windows, ignore)]
fn transitive_expects() {