ReturnIsPtr IntArgRegBitmap
 }
 
+func (r *RegArgs) Dump() {
+       print("Ints:")
+       for _, x := range r.Ints {
+               print(" ", x)
+       }
+       println()
+       print("Floats:")
+       for _, x := range r.Floats {
+               print(" ", x)
+       }
+       println()
+       print("Ptrs:")
+       for _, x := range r.Ptrs {
+               print(" ", x)
+       }
+       println()
+}
+
 // IntArgRegBitmap is a bitmap large enough to hold one bit per
 // integer argument/return register.
 type IntArgRegBitmap [(IntArgRegs + 7) / 8]uint8
 
        *CallGC = false
 }
 
+func TestCallArgLive(t *testing.T) {
+       type T struct{ X, Y *string } // pointerful aggregate
+
+       F := func(t T) { *t.X = "ok" }
+
+       // In reflect.Value.Call, trigger a garbage collection in reflect.call
+       // between marshaling argument and the actual call.
+       *CallGC = true
+
+       x := new(string)
+       runtime.SetFinalizer(x, func(p *string) {
+               if *p != "ok" {
+                       t.Errorf("x dead prematurely")
+               }
+       })
+       v := T{x, nil}
+
+       ValueOf(F).Call([]Value{ValueOf(v)})
+
+       // Stop garbage collecting during reflect.call.
+       *CallGC = false
+}
+
 func TestMakeFuncStackCopy(t *testing.T) {
        target := func(in []Value) []Value {
                runtime.GC()
 
        return v.call("CallSlice", in)
 }
 
-var callGC bool // for testing; see TestCallMethodJump
+var callGC bool // for testing; see TestCallMethodJump and TestCallArgLive
 
 const debugReflectCall = false
 
                                // Copy values to "integer registers."
                                if v.flag&flagIndir != 0 {
                                        offset := add(v.ptr, st.offset, "precomputed value offset")
-                                       memmove(unsafe.Pointer(®Args.Ints[st.ireg]), offset, st.size)
-                               } else {
                                        if st.kind == abiStepPointer {
                                                // Duplicate this pointer in the pointer area of the
                                                // register space. Otherwise, there's the potential for
                                                // this to be the last reference to v.ptr.
+                                               regArgs.Ptrs[st.ireg] = *(*unsafe.Pointer)(offset)
+                                       }
+                                       memmove(unsafe.Pointer(®Args.Ints[st.ireg]), offset, st.size)
+                               } else {
+                                       if st.kind == abiStepPointer {
+                                               // See the comment in abiStepPointer case above.
                                                regArgs.Ptrs[st.ireg] = v.ptr
                                        }
                                        regArgs.Ints[st.ireg] = uintptr(v.ptr)
        // Mark pointers in registers for the return path.
        regArgs.ReturnIsPtr = abi.outRegPtrs
 
+       if debugReflectCall {
+               regArgs.Dump()
+       }
+
+       // For testing; see TestCallArgLive.
+       if callGC {
+               runtime.GC()
+       }
+
        // Call.
        call(frametype, fn, stackArgs, uint32(frametype.size), uint32(abi.retOffset), uint32(frameSize), ®Args)