diff --git a/compiler/vop.lisp b/compiler/vop.lisp
index 5bc7fc1a66b46dd2c8a49d7ce30049b23140b62e..bf937881e0970680a19b395ebf38e289e420b7f5 100644
--- a/compiler/vop.lisp
+++ b/compiler/vop.lisp
@@ -861,9 +861,10 @@
   ;;   :Save
   ;;   :Save-Once
   ;;        A TN used for saving a :Normal TN across function calls.  The
-  ;;        lifetime information slots are copied from the saved TN.  Save-Once
-  ;;        is like :Save, except that it is only save once at the single
-  ;;        writer of the original TN.
+  ;;        lifetime information slots are unitialized: get the original TN our
+  ;;        of the SAVE-TN slot and use it for conflicts. Save-Once is like
+  ;;        :Save, except that it is only save once at the single writer of the
+  ;;        original TN.
   ;;
   ;;   :Load
   ;;        A load-TN used to compute an argument or result that is restricted