---

yaml
---
r: 260
b: refs/heads/master
c: dbb1098
h: refs/heads/master
v: v3

Author: froystig

[refs]

@@ -1,2 +1,2 @@
 ---
-refs/heads/master: 7c8c98a6d7fe02ee697d8490a7203d1da676d908
+refs/heads/master: dbb109853f0ca15e9bb82c39ddecb83d2838e7fc

trunk/src/boot/me/trans.ml

@@ -1723,11 +1723,13 @@ let trans_visitor
         do
           emit (Il.Push (Il.Cell args.(i)))
         done;
+        emit (Il.Push zero);
         emit (Il.Push (Il.Cell abi.Abi.abi_tp_cell));
         emit (Il.Push dst);
         call_code code;
         pop ();
         pop ();
+        pop ();
         Array.iter (fun _ -> pop()) args;
     in
       match dst with