diff --git a/compiler/old-rt/call.lisp b/compiler/old-rt/call.lisp
index 678b66c24d0f4d475a89110576bcd59ec12ca74a..a99d8010677e824d5a2b3b82474c222ad79fbdcb 100644
--- a/compiler/old-rt/call.lisp
+++ b/compiler/old-rt/call.lisp
@@ -480,8 +480,8 @@ default-value-5
 ;;;
 (define-vop (known-return)
   (:args
-   (old-fp)
-   (return-pc)
+   (old-fp :target old-fp-temp)
+   (return-pc :target return-pc-temp)
    (vals :more t))
   (:temporary (:sc descriptor-reg :from (:argument 0)) old-fp-temp)
   (:temporary (:sc descriptor-reg :from (:argument 1)) return-pc-temp)