array_map failed to insert correct result type in an empty array.

Per example from Florian Pflug.

diff --git a/src/backend/utils/adt/arrayfuncs.c b/src/backend/utils/adt/arrayfuncs.c
index 0e2ed00be08fd6174f29df3e9c387b61b8ce978d..cee11cc0b6714b1fd4955ed51aa82fe44064323f 100644 (file)
--- a/src/backend/utils/adt/arrayfuncs.c
+++ b/src/backend/utils/adt/arrayfuncs.c
@@ -8,7 +8,7 @@
  *
  *
  * IDENTIFICATION
- *   $PostgreSQL: pgsql/src/backend/utils/adt/arrayfuncs.c,v 1.113 2004/09/27 01:39:02 tgl Exp $
+ *   $PostgreSQL: pgsql/src/backend/utils/adt/arrayfuncs.c,v 1.114 2004/12/17 20:58:26 tgl Exp $
  *
  *-------------------------------------------------------------------------
  */
@@ -2241,7 +2241,13 @@ array_map(FunctionCallInfo fcinfo, Oid inpType, Oid retType)
 
    /* Check for empty array */
    if (nitems <= 0)
-       PG_RETURN_ARRAYTYPE_P(v);
+   {
+       /* Return empty array */
+       result = (ArrayType *) palloc0(sizeof(ArrayType));
+       result->size = sizeof(ArrayType);
+       result->elemtype = retType;
+       PG_RETURN_ARRAYTYPE_P(result);
+   }
 
    /*
     * We arrange to look up info about input and return element types
@@ -2425,14 +2431,9 @@ construct_md_array(Datum *elems,
    if (ndims == 0)
    {
        /* Allocate and initialize 0-D result array */
-       nbytes = ARR_OVERHEAD(ndims);
-       result = (ArrayType *) palloc(nbytes);
-
-       result->size = nbytes;
-       result->ndim = ndims;
-       result->flags = 0;
+       result = (ArrayType *) palloc0(sizeof(ArrayType));
+       result->size = sizeof(ArrayType);
        result->elemtype = elmtype;
-
        return result;
    }