diff --git a/module/language/cps/reify-primitives.scm b/module/language/cps/reify-primitives.scm
index 51feb6d2b..2dc813694 100644
--- a/module/language/cps/reify-primitives.scm
+++ b/module/language/cps/reify-primitives.scm
@@ -368,7 +368,7 @@
                              (letv idx*)
                              (letk kop ($kargs ('idx) (idx*)
                                          ($continue k src
-                                           ($primcall op ann (obj idx*)))))
+                                           ($primcall op ann (obj idx* val)))))
                              (setk label ($kargs names vars
                                            ($continue kop src
                                              ($primcall 'load-u64 idx ()))))))))))