#538 re-implement Tcl_TransferResult()

[Don Porter]

examine the implications of rewriting
Tcl_TransferResult(f, r, t) to be

Tcl_RestoreInterpState(t,
Tcl_SaveInterpState(f, r));
Tcl_ResetResult(f);