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

remove unused variables from let/letrec

Browse source
This commit is contained in:
Folkert 2022-05-08 20:06:00 +02:00
parent e82c670747
commit 7be41d8c09
No known key found for this signature in database
GPG key ID: 1F17F6FFD112B97C
9 changed files with 74 additions and 130 deletions
Download patch file Download diff file Expand all files Collapse all files

7
compiler/mono/src/copy.rs
View file

@ -114,7 +114,7 @@ pub fn deep_copy_type_vars_into_expr<'a>(
final_else: Box::new(final_else.map(go_help)),
},
LetRec(defs, body, var) => LetRec(
LetRec(defs, body) => LetRec(
defs.iter()
.map(
|Def {
@ -136,9 +136,8 @@ pub fn deep_copy_type_vars_into_expr<'a>(
)
.collect(),
Box::new(body.map(go_help)),
sub!(*var),
),
LetNonRec(def, body, var) => {
LetNonRec(def, body) => {
let Def {
loc_pattern,
loc_expr,
@ -153,7 +152,7 @@ pub fn deep_copy_type_vars_into_expr<'a>(
pattern_vars: pattern_vars.iter().map(|(s, v)| (*s, sub!(*v))).collect(),
annotation: annotation.clone(),
};
LetNonRec(Box::new(def), Box::new(body.map(go_help)), sub!(*var))
LetNonRec(Box::new(def), Box::new(body.map(go_help)))
}
Call(f, args, called_via) => {