mirrors/postgres
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix failure when uniq-ifying an array of zero elements.

Browse Source 
Teodor Sigaev
This commit is contained in:
Tom Lane 2003-05-16 18:49:51 +00:00
parent f9b232f019
commit 86f5fcfeb7
1 changed files with 5 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
contrib/intarray/_int.c
View File

@ -967,6 +967,8 @@ internal_size(int *a, int len)
return size;
}
#define UNIX_UNIQ(a) a = _int_unique(a)
/* r is sorted and size of r > 1 */
static ArrayType *
_int_unique(ArrayType *r)
@ -976,6 +978,9 @@ _int_unique(ArrayType *r)
*data;
int num = ARRNELEMS(r);
if ( num<2 )
return r;
data = tmp = dr = ARRPTR(r);
while (tmp - data < num)
if (*tmp != *dr)
@ -2445,23 +2450,6 @@ if (ARRNELEMS(a) > 1) \
qsort((void*)ARRPTR(a), ARRNELEMS(a),sizeof(int4), \
(direction) ? compASC : compDESC )
#define UNIX_UNIQ(a) a = resize_intArrayType(a, unix_uniq(ARRPTR(a), ARRNELEMS(a)))
static int32
unix_uniq(int32 *array, int32 count)
{
register int32 i,
k = 0;
for (i = 1; i < count; i++)
if (array[k] != array[i])
{
k++;
if (i > k)
array[k] = array[i];
}
return (k + 1);
}
Datum
intset(PG_FUNCTION_ARGS)