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

Fix out of order expect check. Also fix no_inline error in code gen. @acceptance_107

Browse Source
This commit is contained in:
microproofs
2024-07-31 10:00:45 -04:00
committed by Kasey
parent 663695558c
commit 05504b9762
3 changed files with 62 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
crates/aiken-lang/src/gen_uplc/builder.rs
View File

@@ -1457,22 +1457,22 @@ pub fn list_access_to_uplc(
.lambda(tail_name)
} else {
// Custom error if list is not empty after this head
head_item(
name,
tipo,
&tail_name,
Term::var(tail_name.to_string())
.choose_list(
otherwise_delayed.clone(),
Term::var(tail_name.to_string())
.choose_list(
otherwise_delayed.clone(),
head_item(
name,
tipo,
&tail_name,
Term::tail_list()
.apply(Term::var(tail_name.to_string()))
.choose_list(acc.delay(), otherwise_delayed.clone())
.force(),
)
.delay(),
)
.force()
.lambda(tail_name)
)
.force()
.lambda(tail_name)
}
}
}