waalge/aiken
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix:

Browse Source 
Negative numbers now show up as a constant instead of 0 - that number

Expect on constructors without field maps no longer panics

Expect on constructors with discard as assigned field names now no longer throws free unique
This commit is contained in:
microproofs
2023-04-30 14:44:54 -04:00
parent f601ff4703
commit d2dbae1cbf
4 changed files with 84 additions and 52 deletions
Download Patch File Download Diff File Expand all files Collapse all files

89
crates/aiken-project/src/tests/gen_uplc.rs
View File

@@ -1326,51 +1326,52 @@ fn acceptance_test_12_filter_even() {
);
}
// #[test]
// fn acceptance_test_14_list_creation() {
// let src = r#"
// test foo() {
// [0 - 2, 0 - 1, 0] == [-2, -1, 0]
// }
// "#;
#[test]
fn acceptance_test_14_list_creation() {
let src = r#"
test foo() {
[0 - 2, 0 - 1, 0] == [-2, -1, 0]
}
"#;
// assert_uplc(
// src,
// Term::equals_data()
// .apply(
// Term::list_data().apply(
// Term::mk_cons()
// .apply(
// Term::i_data().apply(
// Term::sub_integer()
// .apply(Term::integer(0.into()))
// .apply(Term::integer(2.into())),
// ),
// )
// .apply(
// Term::mk_cons().apply(
// Term::i_data().apply(
// Term::sub_integer()
// .apply(Term::integer(0.into()))
// .apply(Term::integer(1.into())),
// ),
// ),
// )
// .apply(
// Term::mk_cons()
// .apply(Term::i_data().apply(Term::integer(0.into())))
// .apply(Term::empty_list()),
// ),
// ),
// )
// .apply(Term::list_data().apply(Term::list_values(vec![
// Constant::Data(Data::integer((-2).into())),
// Constant::Data(Data::integer((-1).into())),
// Constant::Data(Data::integer(0.into())),
// ]))),
// false,
// );
// }
assert_uplc(
src,
Term::equals_data()
.apply(
Term::list_data().apply(
Term::mk_cons()
.apply(
Term::i_data().apply(
Term::sub_integer()
.apply(Term::integer(0.into()))
.apply(Term::integer(2.into())),
),
)
.apply(
Term::mk_cons()
.apply(
Term::i_data().apply(
Term::sub_integer()
.apply(Term::integer(0.into()))
.apply(Term::integer(1.into())),
),
)
.apply(
Term::mk_cons()
.apply(Term::i_data().apply(Term::integer(0.into())))
.apply(Term::empty_list()),
),
),
),
)
.apply(Term::list_data().apply(Term::list_values(vec![
Constant::Data(Data::integer((-2).into())),
Constant::Data(Data::integer((-1).into())),
Constant::Data(Data::integer(0.into())),
]))),
false,
);
}
// #[test]
// fn when_tuple_deconstruction() {