We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent dc2e47d commit 1c6ecd3Copy full SHA for 1c6ecd3
jscomp/core/lam_pass_remove_alias.ml
@@ -67,7 +67,7 @@ let simplify_alias (meta : Lam_stats.t) (lam : Lam.t) : Lam.t =
67
| Lprim { primitive = Pfull_apply; args = Lvar v :: ap_args as args; loc }
68
-> (
69
(* Inline uncurried application when safe *)
70
- let[@local] normal () =
+ let normal () =
71
Lam.prim ~primitive:Pfull_apply ~args:(Ext_list.map args simpl) loc
72
in
73
let ap_args = Ext_list.map ap_args simpl in
@@ -198,7 +198,6 @@ let simplify_alias (meta : Lam_stats.t) (lam : Lam.t) : Lam.t =
198
199
(* Ext_log.dwarn __LOC__ "%s/%d" v.name v.stamp; *)
200
201
- (* todo bring back local inlining *)
202
let normal () = Lam.apply (simpl fn) ap_args ap_info in
203
match Hash_ident.find_opt meta.ident_tbl v with
204
| Some
0 commit comments