2
0
Эх сурвалжийг харах

deal with neko's reversed eval order for calls (see #4787)

Simon Krajewski 9 жил өмнө
parent
commit
fc3f34c278
1 өөрчлөгдсөн 5 нэмэгдсэн , 0 устгасан
  1. 5 0
      analyzer.ml

+ 5 - 0
analyzer.ml

@@ -550,6 +550,11 @@ module Fusion = struct
 							e
 						| TCall({eexpr = TLocal v},_) when is_really_unbound v ->
 							e
+						| TCall(e1,el) when com.platform = Neko ->
+							(* Neko has this reversed at the moment (issue #4787) *)
+							let el = List.map replace el in
+							let e1 = replace e1 in
+							{e with eexpr = TCall(e1,el)}
 						| _ ->
 							Type.map_expr replace e
 					in