language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-10-01 07:41:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Shorten some variable names

Browse source
This commit is contained in:
Brian Carroll 2021-12-23 15:35:12 +00:00
parent ca501fdcf1
commit 0fbe49dce9
1 changed files with 36 additions and 86 deletions
Download patch file Download diff file Expand all files Collapse all files

122
compiler/mono/src/code_gen_help.rs
View file

@ -972,61 +972,36 @@ impl<'a> CodeGenHelp<'a> {
let elements_2_stmt = |next| Stmt::Let(elements_2, elements_2_expr, box_layout, next); let elements_2_stmt = |next| Stmt::Let(elements_2, elements_2_expr, box_layout, next);
// Cast to integers // Cast to integers
let start_addr_1 = self.create_symbol(ident_ids, "start_addr_1"); let start_1 = self.create_symbol(ident_ids, "start_1");
let start_addr_2 = self.create_symbol(ident_ids, "start_addr_2"); let start_2 = self.create_symbol(ident_ids, "start_2");
let start_addr_1_stmt = |next| { let start_1_stmt =
let_lowlevel( |next| let_lowlevel(arena, layout_isize, start_1, PtrCast, &[elements_1], next);
arena, let start_2_stmt =
layout_isize, |next| let_lowlevel(arena, layout_isize, start_2, PtrCast, &[elements_2], next);
start_addr_1,
PtrCast,
&[elements_1],
next,
)
};
let start_addr_2_stmt = |next| {
let_lowlevel(
arena,
layout_isize,
start_addr_2,
PtrCast,
&[elements_2],
next,
)
};
// //
// Loop initialisation // Loop initialisation
// //
// let elem_size = literal int // let size = literal int
let elem_size = self.create_symbol(ident_ids, "elem_size"); let size = self.create_symbol(ident_ids, "size");
let elem_size_expr = let size_expr = Expr::Literal(Literal::Int(elem_layout.stack_size(self.ptr_size) as i128));
Expr::Literal(Literal::Int(elem_layout.stack_size(self.ptr_size) as i128)); let size_stmt = |next| Stmt::Let(size, size_expr, layout_isize, next);
let elem_size_stmt = |next| Stmt::Let(elem_size, elem_size_expr, layout_isize, next);
// let list_size = len_1 * elem_size // let list_size = len_1 * size
let list_size = self.create_symbol(ident_ids, "list_size"); let list_size = self.create_symbol(ident_ids, "list_size");
let list_size_stmt = |next| { let list_size_stmt =
let_lowlevel( |next| let_lowlevel(arena, layout_isize, list_size, NumMul, &[len_1, size], next);
arena,
layout_isize,
list_size,
NumMul,
&[len_1, elem_size],
next,
)
};
// let end_addr_1 = start_addr_1 + list_size // let end_1 = start_1 + list_size
let end_addr_1 = self.create_symbol(ident_ids, "end_addr_1"); let end_1 = self.create_symbol(ident_ids, "end_1");
let end_addr_1_stmt = |next| { let end_1_stmt = |next| {
let_lowlevel( let_lowlevel(
arena, arena,
layout_isize, layout_isize,
end_addr_1, end_1,
NumAdd, NumAdd,
&[start_addr_1, list_size], &[start_1, list_size],
next, next,
) )
}; };
@ -1086,55 +1061,31 @@ impl<'a> CodeGenHelp<'a> {
let eq_elems_stmt = |next| Stmt::Let(eq_elems, eq_elems_expr, LAYOUT_BOOL, next); let eq_elems_stmt = |next| Stmt::Let(eq_elems, eq_elems_expr, LAYOUT_BOOL, next);
// If current elements are equal, loop back again // If current elements are equal, loop back again
let next_addr_1 = self.create_symbol(ident_ids, "next_addr_1"); let next_1 = self.create_symbol(ident_ids, "next_1");
let next_addr_2 = self.create_symbol(ident_ids, "next_addr_2"); let next_2 = self.create_symbol(ident_ids, "next_2");
let next_addr_1_stmt = |next| { let next_1_stmt =
let_lowlevel( |next| let_lowlevel(arena, layout_isize, next_1, NumAdd, &[addr1, size], next);
arena, let next_2_stmt =
layout_isize, |next| let_lowlevel(arena, layout_isize, next_2, NumAdd, &[addr2, size], next);
next_addr_1,
NumAdd,
&[addr1, elem_size],
next,
)
};
let next_addr_2_stmt = |next| {
let_lowlevel(
arena,
layout_isize,
next_addr_2,
NumAdd,
&[addr2, elem_size],
next,
)
};
let jump_back = Stmt::Jump(elems_loop, self.arena.alloc([next_addr_1, next_addr_2])); let jump_back = Stmt::Jump(elems_loop, self.arena.alloc([next_1, next_2]));
// //
// Control flow // Control flow
// //
let is_end = self.create_symbol(ident_ids, "is_end"); let is_end = self.create_symbol(ident_ids, "is_end");
let is_end_stmt = |next| { let is_end_stmt =
let_lowlevel( |next| let_lowlevel(arena, LAYOUT_BOOL, is_end, NumGte, &[addr1, end_1], next);
arena,
LAYOUT_BOOL,
is_end,
NumGte,
&[addr1, end_addr_1],
next,
)
};
let if_elems_not_equal = self.if_false_return_false( let if_elems_not_equal = self.if_false_return_false(
eq_elems, eq_elems,
// else // else
self.arena.alloc( self.arena.alloc(
// //
next_addr_1_stmt(self.arena.alloc( next_1_stmt(self.arena.alloc(
// //
next_addr_2_stmt(self.arena.alloc( next_2_stmt(self.arena.alloc(
// //
jump_back, jump_back,
)), )),
@ -1183,10 +1134,9 @@ impl<'a> CodeGenHelp<'a> {
self.arena.alloc(if_end_of_list), self.arena.alloc(if_end_of_list),
), ),
), ),
remainder: self.arena.alloc(Stmt::Jump( remainder: self
elems_loop, .arena
self.arena.alloc([start_addr_1, start_addr_2]), .alloc(Stmt::Jump(elems_loop, self.arena.alloc([start_1, start_2]))),
)),
}; };
let if_different_lengths = self.if_false_return_false( let if_different_lengths = self.if_false_return_false(
@ -1198,15 +1148,15 @@ impl<'a> CodeGenHelp<'a> {
// //
elements_2_stmt(self.arena.alloc( elements_2_stmt(self.arena.alloc(
// //
start_addr_1_stmt(self.arena.alloc( start_1_stmt(self.arena.alloc(
// //
start_addr_2_stmt(self.arena.alloc( start_2_stmt(self.arena.alloc(
// //
elem_size_stmt(self.arena.alloc( size_stmt(self.arena.alloc(
// //
list_size_stmt(self.arena.alloc( list_size_stmt(self.arena.alloc(
// //
end_addr_1_stmt(self.arena.alloc( end_1_stmt(self.arena.alloc(
// //
joinpoint_loop, joinpoint_loop,
)), )),