FIX: Crash when converting empty vector to block

fixes: metaeducation/rebol-issues#2346

Author: Oldes

src/core/t-vector.c

@@ -211,9 +211,9 @@ void Set_Vector_Row(REBSER *ser, REBVAL *blk)
 			VAL_SET(val, (type >= VTSF08) ? REB_DECIMAL : REB_INTEGER);
 			VAL_INT64(val) = get_vect(type, data, n); // can be int or decimal
 		}
+		SET_END(val);
 	}
 
-	SET_END(val);
 	ser->tail = len;
 
 	return ser;

src/tests/units/series-test.r3

@@ -166,4 +166,11 @@ Rebol [
 ===end-group===
 
 
+===start-group=== "VECTOR"
+
+--test-- "issue/2346"
+	--assert [] = to-block make vector! 0
+
+===end-group===
+
 ~~~end-file~~~