Compiler: fix bug in Js_traverse.rename_variable

ocsigen · Aug 2, 2016 · 0977193 · 0977193
1 parent 0ecb12b
commit 0977193
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/compiler/js_traverse.ml b/compiler/js_traverse.ml
@@ -448,6 +448,7 @@ class rename_variable keeps = object
   val mutable sub_ = new subst (fun x -> x)
 
   method merge_info from =
+    super#merge_info from;
     let h = Hashtbl.create 17 in
     let _ = StringSet.iter (fun name ->
         if StringSet.mem name keeps