language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-29 14:54:47 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 7

codegen for walkRight

Browse source
This commit is contained in:
Folkert 2020-09-06 22:03:46 +02:00
parent 5d0ec57461
commit 25cd0a2c02
7 changed files with 188 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

17
compiler/gen/src/llvm/build.rs
View file

@ -1711,7 +1711,22 @@ fn run_low_level<'a, 'ctx, 'env>(
// List.walkRight : List elem, (elem -> accum -> accum), accum -> accum
debug_assert_eq!(args.len(), 3);
list_walk_right(env)
let (list, list_layout) = load_symbol_and_layout(env, scope, &args[0]);
let (func, func_layout) = load_symbol_and_layout(env, scope, &args[1]);
let (default, default_layout) = load_symbol_and_layout(env, scope, &args[2]);
list_walk_right(
env,
parent,
list,
list_layout,
func,
func_layout,
default,
default_layout,
)
}
ListAppend => {
// List.append : List elem, elem -> List elem