Transfer visibility when copying arrow tuple slot

When creating a heap tuple from an arrow slot, it is necessary to also
transfer the visibility information from the compressed
tuple. Otherwise, the new tuple, if written into another relation,
might not have the correct visibility.

tsl/src/hypercore/arrow_tts.c

@@ -5,6 +5,7 @@
  */
 #include <postgres.h>
 #include <access/attnum.h>
+#include <access/htup_details.h>
 #include <access/tupdesc.h>
 #include <catalog/pg_attribute.h>
 #include <executor/execdebug.h>
@@ -719,9 +720,19 @@ tts_arrow_copy_heap_tuple(TupleTableSlot *slot)
 	tuple = ExecCopySlotHeapTuple(aslot->noncompressed_slot);
 	ItemPointerCopy(&slot->tts_tid, &tuple->t_self);
 
-	/* Clean up if the non-compressed slot was "borrowed" */
 	if (aslot->child_slot == aslot->compressed_slot)
+	{
+		BufferHeapTupleTableSlot *hslot = (BufferHeapTupleTableSlot *) aslot->compressed_slot;
+		Assert(TTS_IS_BUFFERTUPLE(aslot->compressed_slot));
+
+		/* Copy visibility information from the compressed relation tuple */
+		memcpy(&tuple->t_data->t_choice,
+			   &hslot->base.tuple->t_data->t_choice,
+			   sizeof(tuple->t_data->t_choice));
+
+		/* Clean up the "borrowed" non-compressed slot */
 		ExecClearTuple(aslot->noncompressed_slot);
+	}
 
 	return tuple;
 }