[snapshot] bug fix release

Author: Hongbo Zhang

jscomp/bin/compiler.ml

@@ -1,4 +1,4 @@
-(** Bundled by ocaml_pack 05/23-17:15 *)
+(** Bundled by ocaml_pack 05/24-13:02 *)
 module Literals : sig 
 #1 "literals.mli"
 (* Copyright (C) 2015-2016 Bloomberg Finance L.P.
@@ -18185,11 +18185,9 @@ let rewrite (map :   (Ident.t, _) Hashtbl.t)
       let l2 = aux l2 in
       Llet(str, v,  l1,  l2 )
     | Lletrec(bindings, body) ->
-      let bindings = 
-        bindings |> List.map (fun (k,l) ->  
-            let k = rebind k in
-            (k, aux l)
-          )  in 
+      (*order matters see GPR #405*)
+      let vars = List.map (fun (k, _) -> rebind k) bindings in 
+      let bindings = List.map2 (fun var (_,l) -> var, aux l) vars bindings in 
       let body = aux body in       
       Lletrec(bindings, body) 
     | Lfunction(kind, params, body) -> 

package.json

@@ -23,7 +23,7 @@
     "postinstall": "./scripts/postinstall.sh"
   },
   "name": "bs-platform",
-  "version": "0.5.1",
+  "version": "0.5.2",
   "description": "bucklescript compiler, ocaml standard libary by bucklescript and its required runtime support",
   "repository": {
     "type": "git",