*/
    *arrayType = getBaseTypeAndTypmod(*arrayType, arrayTypmod);
 
+   /*
+    * We treat int2vector and oidvector as though they were domains over
+    * int2[] and oid[].  This is needed because array slicing could create an
+    * array that doesn't satisfy the dimensionality constraints of the
+    * xxxvector type; so we want the result of a slice operation to be
+    * considered to be of the more general type.
+    */
+   if (*arrayType == INT2VECTOROID)
+       *arrayType = INT2ARRAYOID;
+   else if (*arrayType == OIDVECTOROID)
+       *arrayType = OIDARRAYOID;
+
    /* Get the type tuple for the array */
    type_tuple_array = SearchSysCache1(TYPEOID, ObjectIdGetDatum(*arrayType));
    if (!HeapTupleIsValid(type_tuple_array))
  * For both cases, if the source array is of a domain-over-array type,
  * the result is of the base array type or its element type; essentially,
  * we must fold a domain to its base type before applying subscripting.
+ * (Note that int2vector and oidvector are treated as domains here.)
  *
  * pstate      Parse state
  * arrayBase   Already-transformed expression for the array as a whole
 
    /* If target was a domain over array, need to coerce up to the domain */
    if (arrayType != targetTypeId)
    {
+       Oid         resulttype = exprType(result);
+
        result = coerce_to_target_type(pstate,
-                                      result, exprType(result),
+                                      result, resulttype,
                                       targetTypeId, targetTypMod,
                                       COERCION_ASSIGNMENT,
                                       COERCE_IMPLICIT_CAST,
                                       -1);
-       /* probably shouldn't fail, but check */
+       /* can fail if we had int2vector/oidvector, but not for true domains */
        if (result == NULL)
            ereport(ERROR,
                    (errcode(ERRCODE_CANNOT_COERCE),
                     errmsg("cannot cast type %s to %s",
-                           format_type_be(exprType(result)),
+                           format_type_be(resulttype),
                            format_type_be(targetTypeId)),
                     parser_errposition(pstate, location)));
    }
 
 DATA(insert OID = 1002 (  _char         PGNSP PGUID -1 f b A f t \054 0    18 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 0 _null_ _null_ ));
 DATA(insert OID = 1003 (  _name         PGNSP PGUID -1 f b A f t \054 0    19 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 0 _null_ _null_ ));
 DATA(insert OID = 1005 (  _int2         PGNSP PGUID -1 f b A f t \054 0    21 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 0 _null_ _null_ ));
+#define INT2ARRAYOID       1005
 DATA(insert OID = 1006 (  _int2vector PGNSP PGUID -1 f b A f t \054 0  22 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 0 _null_ _null_ ));
 DATA(insert OID = 1007 (  _int4         PGNSP PGUID -1 f b A f t \054 0    23 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 0 _null_ _null_ ));
 #define INT4ARRAYOID       1007
 DATA(insert OID = 1009 (  _text         PGNSP PGUID -1 f b A f t \054 0    25 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 100 _null_ _null_ ));
 #define TEXTARRAYOID       1009
 DATA(insert OID = 1028 (  _oid      PGNSP PGUID -1 f b A f t \054 0    26 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 0 _null_ _null_ ));
+#define OIDARRAYOID            1028
 DATA(insert OID = 1010 (  _tid      PGNSP PGUID -1 f b A f t \054 0    27 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 0 _null_ _null_ ));
 DATA(insert OID = 1011 (  _xid      PGNSP PGUID -1 f b A f t \054 0    28 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 0 _null_ _null_ ));
 DATA(insert OID = 1012 (  _cid      PGNSP PGUID -1 f b A f t \054 0    29 0 array_in array_out array_recv array_send - - - i x f 0 -1 0 0 _null_ _null_ ));