%%diff -ruN postgresql-6.5.2/src/backend/access/hash/hashfunc.c postgresql-patched/src/backend/access/hash/hashfunc.c
%%--- postgresql-6.5.2/src/backend/access/hash/hashfunc.c	Mon Aug  2 01:24:33 1999
%%+++ postgresql-patched/src/backend/access/hash/hashfunc.c	Fri Oct 29 08:40:10 1999
%%@@ -21,15 +21,15 @@
%% #include "access/hash.h"
%% 
%% uint32
%%-hashint2(int16 key)
%%+hashint2(Datum key)
%% {
%%-	return (uint32) ~key;
%%+	return (uint32) ~((int16)key);
%% }
%% 
%% uint32
%%-hashint4(uint32 key)
%%+hashint4(Datum key)
%% {
%%-	return ~key;
%%+	return ~((uint32)key);
%% }
%% 
%% uint32
%%@@ -155,7 +155,7 @@
%% #define PRIME2			1048583
%% 
%% uint32
%%-hashchar(char key)
%%+hashchar(Datum key)
%% {
%% 	int			len;
%% 	uint32		h;
%%@@ -163,7 +163,7 @@
%% 	h = 0;
%% 	len = sizeof(char);
%% 	/* Convert char to integer */
%%-	h = h * PRIME1 ^ (key - ' ');
%%+	h = h * PRIME1 ^ ((char)key - ' ');
%% 	h %= PRIME2;
%% 
%% 	return h;
%%diff -ruN postgresql-6.5.2/src/backend/access/nbtree/nbtcompare.c postgresql-patched/src/backend/access/nbtree/nbtcompare.c
%%--- postgresql-6.5.2/src/backend/access/nbtree/nbtcompare.c	Mon Aug  2 01:24:40 1999
%%+++ postgresql-patched/src/backend/access/nbtree/nbtcompare.c	Fri Oct 29 08:40:10 1999
%%@@ -26,15 +26,15 @@
%% #include "utils/builtins.h"
%% 
%% int32
%%-btint2cmp(int16 a, int16 b)
%%+btint2cmp(Datum a, Datum b)
%% {
%%-	return (int32) (a - b);
%%+	return (int32) ((int16)a - (int16)b);
%% }
%% 
%% int32
%%-btint4cmp(int32 a, int32 b)
%%+btint4cmp(Datum a, Datum b)
%% {
%%-	return a - b;
%%+	return (int32)a - (int32)b;
%% }
%% 
%% int32
%%@@ -49,15 +49,15 @@
%% }
%% 
%% int32
%%-btint24cmp(int16 a, int32 b)
%%+btint24cmp(Datum a, Datum b)
%% {
%%-	return ((int32) a) - b;
%%+	return ((int16) a) - (int32)b;
%% }
%% 
%% int32
%%-btint42cmp(int32 a, int16 b)
%%+btint42cmp(Datum a, Datum b)
%% {
%%-	return a - ((int32) b);
%%+	return (int32)a - ((int16) b);
%% }
%% 
%% int32
%%@@ -112,8 +112,9 @@
%% 
%% 
%% int32
%%-btabstimecmp(AbsoluteTime a, AbsoluteTime b)
%%+btabstimecmp(Datum da, Datum db)
%% {
%%+	AbsoluteTime a = da,  b = db;
%% 	if (AbsoluteTimeIsBefore(a, b))
%% 		return -1;
%% 	else if (AbsoluteTimeIsBefore(b, a))
%%@@ -123,7 +124,7 @@
%% }
%% 
%% int32
%%-btcharcmp(char a, char b)
%%+btcharcmp(Datum a, Datum b)
%% {
%% 	return (int32) ((uint8) a - (uint8) b);
%% }
%%diff -ruN postgresql-6.5.2/src/backend/rewrite/rewriteManip.c postgresql-patched/src/backend/rewrite/rewriteManip.c
%%--- postgresql-6.5.2/src/backend/rewrite/rewriteManip.c	Wed May 26 08:55:48 1999
%%+++ postgresql-patched/src/backend/rewrite/rewriteManip.c	Fri Oct 29 08:40:10 1999
%%@@ -717,6 +717,7 @@
%% 					else
%% 					{
%% 						*nodePtr = copyObject(n);
%%+						if(IsA(*nodePtr, Var ))
%% 						((Var *) *nodePtr)->varlevelsup = this_varlevelsup;
%% 					}
%% 				}
%%diff -ruN postgresql-6.5.2/src/backend/storage/ipc/Makefile postgresql-patched/src/backend/storage/ipc/Makefile
%%--- postgresql-6.5.2/src/backend/storage/ipc/Makefile	Sun Apr  5 20:25:14 1998
%%+++ postgresql-patched/src/backend/storage/ipc/Makefile	Fri Oct 29 08:40:10 1999
%%@@ -13,6 +13,16 @@
%% 
%% CFLAGS += -I../..
%% 
%%+# seems to be required 1999/07/22 bjm
%%+ifeq ($(CPU),alpha)
%%+ifeq ($(CC), gcc)
%%+CFLAGS+= -fno-inline
%%+endif
%%+ifeq ($(CC), egcs)
%%+CFLAGS+= -fno-inline
%%+endif
%%+endif
%%+
%% OBJS = ipc.o ipci.o shmem.o shmqueue.o sinval.o \
%%        sinvaladt.o spin.o
%% 
%%diff -ruN postgresql-6.5.2/src/backend/utils/adt/char.c postgresql-patched/src/backend/utils/adt/char.c
%%--- postgresql-6.5.2/src/backend/utils/adt/char.c	Mon Aug  2 01:24:50 1999
%%+++ postgresql-patched/src/backend/utils/adt/char.c	Fri Oct 29 08:40:10 1999
%%@@ -34,7 +34,7 @@
%%  *		charout			- converts 'x' to "x"
%%  */
%% char *
%%-charout(int32 ch)
%%+charout(Datum ch)
%% {
%% 	char	   *result = (char *) palloc(2);
%% 
%%@@ -69,7 +69,7 @@
%%  *		printable character...
%%  */
%% char *
%%-cidout(int32 c)
%%+cidout(Datum c)
%% {
%% 	char	   *result;
%% 	CommandId	c2;
%%@@ -86,69 +86,69 @@
%%  *****************************************************************************/
%% 
%% bool
%%-chareq(int8 arg1, int8 arg2)
%%+chareq(Datum arg1, Datum arg2)
%% {
%%-	return arg1 == arg2;
%%+	return (int8)arg1 == (int8)arg2;
%% }
%% 
%% bool
%%-charne(int8 arg1, int8 arg2)
%%+charne(Datum arg1, Datum arg2)
%% {
%%-	return arg1 != arg2;
%%+	return (int8)arg1 != (int8)arg2;
%% }
%% 
%% bool
%%-charlt(int8 arg1, int8 arg2)
%%+charlt(Datum arg1, Datum arg2)
%% {
%% 	return (uint8) arg1 < (uint8) arg2;
%% }
%% 
%% bool
%%-charle(int8 arg1, int8 arg2)
%%+charle(Datum arg1, Datum arg2)
%% {
%% 	return (uint8) arg1 <= (uint8) arg2;
%% }
%% 
%% bool
%%-chargt(int8 arg1, int8 arg2)
%%+chargt(Datum arg1, Datum arg2)
%% {
%% 	return (uint8) arg1 > (uint8) arg2;
%% }
%% 
%% bool
%%-charge(int8 arg1, int8 arg2)
%%+charge(Datum arg1, Datum arg2)
%% {
%% 	return (uint8) arg1 >= (uint8) arg2;
%% }
%% 
%% int8
%%-charpl(int8 arg1, int8 arg2)
%%+charpl(Datum arg1, Datum arg2)
%% {
%%-	return arg1 + arg2;
%%+	return (int8)arg1 + (int8)arg2;
%% }
%% 
%% int8
%%-charmi(int8 arg1, int8 arg2)
%%+charmi(Datum arg1, Datum arg2)
%% {
%%-	return arg1 - arg2;
%%+	return (int8)arg1 - (int8)arg2;
%% }
%% 
%% int8
%%-charmul(int8 arg1, int8 arg2)
%%+charmul(Datum arg1, Datum arg2)
%% {
%%-	return arg1 * arg2;
%%+	return (int8)arg1 * (int8)arg2;
%% }
%% 
%% int8
%%-chardiv(int8 arg1, int8 arg2)
%%+chardiv(Datum arg1, Datum arg2)
%% {
%%-	return arg1 / arg2;
%%+	return (int8)arg1 / (int8)arg2;
%% }
%% 
%% bool
%%-cideq(int8 arg1, int8 arg2)
%%+cideq(Datum arg1, Datum arg2)
%% {
%%-	return arg1 == arg2;
%%+	return (int8)arg1 == (int8)arg2;
%% }
%% 
%% int8
%%@@ -158,13 +158,13 @@
%% }
%% 
%% text *
%%-char_text(int8 arg1)
%%+char_text(Datum arg1)
%% {
%% 	text	   *result;
%% 
%% 	result = palloc(VARHDRSZ + 1);
%% 	VARSIZE(result) = VARHDRSZ + 1;
%%-	*(VARDATA(result)) = arg1;
%%+	*(VARDATA(result)) = (int8)arg1;
%% 
%% 	return result;
%% }
%%diff -ruN postgresql-6.5.2/src/backend/utils/adt/date.c postgresql-patched/src/backend/utils/adt/date.c
%%--- postgresql-6.5.2/src/backend/utils/adt/date.c	Mon Aug  2 01:24:51 1999
%%+++ postgresql-patched/src/backend/utils/adt/date.c	Fri Oct 29 08:40:10 1999
%%@@ -159,8 +159,9 @@
%%  *		reltimeout		- converts the internal format to a reltime string
%%  */
%% char *
%%-reltimeout(RelativeTime time)
%%+reltimeout(Datum t)
%% {
%%+	RelativeTime time = (RelativeTime) t;
%% 	char	   *result;
%% 	struct tm	tt,
%% 			   *tm = &tt;
%%@@ -191,8 +192,10 @@
%% } while(0)
%% 
%% static void
%%-reltime2tm(RelativeTime time, struct tm * tm)
%%+reltime2tm(RelativeTime t, struct tm * tm)
%% {
%%+	RelativeTime time = (RelativeTime) t;
%%+
%% 	TMODULO(time, tm->tm_year, 31536000);
%% 	TMODULO(time, tm->tm_mon, 2592000);
%% 	TMODULO(time, tm->tm_mday, 86400);
%%@@ -357,8 +360,9 @@
%% 
%% 
%% TimeSpan   *
%%-reltime_timespan(RelativeTime reltime)
%%+reltime_timespan(Datum relt)
%% {
%%+	RelativeTime reltime = (RelativeTime) relt;
%% 	TimeSpan   *result;
%% 	int			year,
%% 				month;
%%@@ -388,8 +392,9 @@
%%  *		mktinterval		- creates a time interval with endpoints t1 and t2
%%  */
%% TimeInterval
%%-mktinterval(AbsoluteTime t1, AbsoluteTime t2)
%%+mktinterval(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1, t2 = d2;
%% 	AbsoluteTime tstart = ABSTIMEMIN(t1, t2),
%% 				tend = ABSTIMEMAX(t1, t2);
%% 	TimeInterval interval;
%%@@ -418,8 +423,10 @@
%%  *		timepl			- returns the value of (abstime t1 + relime t2)
%%  */
%% AbsoluteTime
%%-timepl(AbsoluteTime t1, RelativeTime t2)
%%+timepl(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1;
%%+	RelativeTime t2 = d2;
%% 	if (t1 == CURRENT_ABSTIME)
%% 		t1 = GetCurrentTransactionStartTime();
%% 
%%@@ -437,8 +444,11 @@
%%  *		timemi			- returns the value of (abstime t1 - reltime t2)
%%  */
%% AbsoluteTime
%%-timemi(AbsoluteTime t1, RelativeTime t2)
%%+timemi(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1;
%%+	RelativeTime t2 = d2;
%%+
%% 	if (t1 == CURRENT_ABSTIME)
%% 		t1 = GetCurrentTransactionStartTime();
%% 
%%@@ -456,8 +466,10 @@
%%  *		abstimemi		- returns the value of (abstime t1 - abstime t2)
%%  */
%% static RelativeTime
%%-abstimemi(AbsoluteTime t1, AbsoluteTime t2)
%%+abstimemi(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1, t2 = d2;
%%+
%% 	if (t1 == CURRENT_ABSTIME)
%% 		t1 = GetCurrentTransactionStartTime();
%% 	if (t2 == CURRENT_ABSTIME)
%%@@ -475,8 +487,10 @@
%%  *		ininterval		- returns 1, iff absolute date is in the interval
%%  */
%% int
%%-ininterval(AbsoluteTime t, TimeInterval interval)
%%+ininterval(Datum d, TimeInterval interval)
%% {
%%+	AbsoluteTime t = d;
%%+
%% 	if (interval->status == T_INTERVAL_VALID && t != INVALID_ABSTIME)
%% 		return (abstimege(t, interval->data[0]) &&
%% 				abstimele(t, interval->data[1]));
%%@@ -489,6 +503,7 @@
%% RelativeTime
%% intervalrel(TimeInterval interval)
%% {
%%+
%% 	if (interval->status == T_INTERVAL_VALID)
%% 		return abstimemi(interval->data[1], interval->data[0]);
%% 	else
%%@@ -519,51 +534,57 @@
%%  *		reltimege		- returns 1, iff t1 greater than or equal to t2
%%  */
%% bool
%%-reltimeeq(RelativeTime t1, RelativeTime t2)
%%+reltimeeq(Datum t1, Datum t2)
%% {
%%-	if (t1 == INVALID_RELTIME || t2 == INVALID_RELTIME)
%%+	if ((RelativeTime)t1 == INVALID_RELTIME 
%%+	||  (RelativeTime)t2 == INVALID_RELTIME)
%% 		return 0;
%%-	return t1 == t2;
%%+	return (RelativeTime)t1 == (RelativeTime)t2;
%% }
%% 
%% bool
%%-reltimene(RelativeTime t1, RelativeTime t2)
%%+reltimene(Datum t1, Datum t2)
%% {
%%-	if (t1 == INVALID_RELTIME || t2 == INVALID_RELTIME)
%%+	if ((RelativeTime)t1 == INVALID_RELTIME 
%%+	||  (RelativeTime)t2 == INVALID_RELTIME)
%% 		return 0;
%%-	return t1 != t2;
%%+	return (RelativeTime)t1 != (RelativeTime)t2;
%% }
%% 
%% bool
%%-reltimelt(RelativeTime t1, RelativeTime t2)
%%+reltimelt(Datum t1, Datum t2)
%% {
%%-	if (t1 == INVALID_RELTIME || t2 == INVALID_RELTIME)
%%+	if ((RelativeTime)t1 == INVALID_RELTIME 
%%+	||  (RelativeTime)t2 == INVALID_RELTIME)
%% 		return 0;
%%-	return t1 < t2;
%%+	return (RelativeTime)t1 < (RelativeTime)t2;
%% }
%% 
%% bool
%%-reltimegt(RelativeTime t1, RelativeTime t2)
%%+reltimegt(Datum t1, Datum t2)
%% {
%%-	if (t1 == INVALID_RELTIME || t2 == INVALID_RELTIME)
%%+	if ((RelativeTime)t1 == INVALID_RELTIME 
%%+	||  (RelativeTime)t2 == INVALID_RELTIME)
%% 		return 0;
%%-	return t1 > t2;
%%+	return (RelativeTime)t1 > (RelativeTime)t2;
%% }
%% 
%% bool
%%-reltimele(RelativeTime t1, RelativeTime t2)
%%+reltimele(Datum t1, Datum t2)
%% {
%%-	if (t1 == INVALID_RELTIME || t2 == INVALID_RELTIME)
%%+	if ((RelativeTime)t1 == INVALID_RELTIME 
%%+	||  (RelativeTime)t2 == INVALID_RELTIME)
%% 		return 0;
%%-	return t1 <= t2;
%%+	return (RelativeTime)t1 <= (RelativeTime)t2;
%% }
%% 
%% bool
%%-reltimege(RelativeTime t1, RelativeTime t2)
%%+reltimege(Datum t1, Datum t2)
%% {
%%-	if (t1 == INVALID_RELTIME || t2 == INVALID_RELTIME)
%%+	if ((RelativeTime)t1 == INVALID_RELTIME 
%%+	||  (RelativeTime)t2 == INVALID_RELTIME)
%% 		return 0;
%%-	return t1 >= t2;
%%+	return (RelativeTime)t1 >= (RelativeTime)t2;
%% }
%% 
%% 
%%@@ -803,8 +824,9 @@
%%  *								reltime t
%%  */
%% bool
%%-intervalleneq(TimeInterval i, RelativeTime t)
%%+intervalleneq(TimeInterval i, Datum d)
%% {
%%+	RelativeTime t = d;
%% 	RelativeTime rt;
%% 
%% 	if ((i->status == T_INTERVAL_INVAL) || (t == INVALID_RELTIME))
%%@@ -818,8 +840,9 @@
%%  *								to reltime t
%%  */
%% bool
%%-intervallenne(TimeInterval i, RelativeTime t)
%%+intervallenne(TimeInterval i, Datum d)
%% {
%%+	RelativeTime t = d;
%% 	RelativeTime rt;
%% 
%% 	if ((i->status == T_INTERVAL_INVAL) || (t == INVALID_RELTIME))
%%@@ -833,8 +856,9 @@
%%  *								reltime t
%%  */
%% bool
%%-intervallenlt(TimeInterval i, RelativeTime t)
%%+intervallenlt(TimeInterval i, Datum d)
%% {
%%+	RelativeTime t = d;
%% 	RelativeTime rt;
%% 
%% 	if ((i->status == T_INTERVAL_INVAL) || (t == INVALID_RELTIME))
%%@@ -848,8 +872,9 @@
%%  *								reltime t
%%  */
%% bool
%%-intervallengt(TimeInterval i, RelativeTime t)
%%+intervallengt(TimeInterval i, Datum d)
%% {
%%+	RelativeTime t = d;
%% 	RelativeTime rt;
%% 
%% 	if ((i->status == T_INTERVAL_INVAL) || (t == INVALID_RELTIME))
%%@@ -863,8 +888,9 @@
%%  *									than reltime t
%%  */
%% bool
%%-intervallenle(TimeInterval i, RelativeTime t)
%%+intervallenle(TimeInterval i, Datum d)
%% {
%%+	RelativeTime t = d;
%% 	RelativeTime rt;
%% 
%% 	if ((i->status == T_INTERVAL_INVAL) || (t == INVALID_RELTIME))
%%@@ -878,8 +904,9 @@
%%  *								equal than reltime t
%%  */
%% bool
%%-intervallenge(TimeInterval i, RelativeTime t)
%%+intervallenge(TimeInterval i, Datum d)
%% {
%%+	RelativeTime t = d;
%% 	RelativeTime rt;
%% 
%% 	if ((i->status == T_INTERVAL_INVAL) || (t == INVALID_RELTIME))
%%diff -ruN postgresql-6.5.2/src/backend/utils/adt/float.c postgresql-patched/src/backend/utils/adt/float.c
%%--- postgresql-6.5.2/src/backend/utils/adt/float.c	Mon Aug  2 01:24:52 1999
%%+++ postgresql-patched/src/backend/utils/adt/float.c	Fri Oct 29 08:40:10 1999
%%@@ -851,9 +851,10 @@
%%  *		i4tod			- converts an int4 number to a float8 number
%%  */
%% float64
%%-i4tod(int32 num)
%%+i4tod(Datum n)
%% {
%% 	float64		result;
%%+	int32	num = (int32) n;
%% 
%% 	result = (float64) palloc(sizeof(float64data));
%% 
%%@@ -866,9 +867,10 @@
%%  *		i2tod			- converts an int2 number to a float8 number
%%  */
%% float64
%%-i2tod(int16 num)
%%+i2tod(Datum n)
%% {
%% 	float64		result;
%%+	int16	num = (int16) n;
%% 
%% 	result = (float64) palloc(sizeof(float64data));
%% 
%%@@ -919,9 +921,10 @@
%%  *		i4tof			- converts an int4 number to a float8 number
%%  */
%% float32
%%-i4tof(int32 num)
%%+i4tof(Datum n)
%% {
%% 	float32		result;
%%+	int32	num = (int32) n;
%% 
%% 	result = (float32) palloc(sizeof(float32data));
%% 
%%@@ -934,9 +937,10 @@
%%  *		i2tof			- converts an int2 number to a float8 number
%%  */
%% float32
%%-i2tof(int16 num)
%%+i2tof(Datum n)
%% {
%% 	float32		result;
%%+	int16	num = (int16) n;
%% 
%% 	result = (float32) palloc(sizeof(float32data));
%% 
%%diff -ruN postgresql-6.5.2/src/backend/utils/adt/int.c postgresql-patched/src/backend/utils/adt/int.c
%%--- postgresql-6.5.2/src/backend/utils/adt/int.c	Mon Aug  2 01:24:53 1999
%%+++ postgresql-patched/src/backend/utils/adt/int.c	Fri Oct 29 08:40:10 1999
%%@@ -60,7 +60,7 @@
%%  *		int2out			- converts short to "num"
%%  */
%% char *
%%-int2out(int16 sh)
%%+int2out(Datum sh)
%% {
%% 	char	   *result;
%% 
%%@@ -205,12 +205,12 @@
%%  *		int4out			- converts int4 to "num"
%%  */
%% char *
%%-int4out(int32 l)
%%+int4out(Datum l)
%% {
%% 	char	   *result;
%% 
%% 	result = (char *) palloc(12);		/* assumes sign, 10 digits, '\0' */
%%-	ltoa(l, result);
%%+	ltoa((int32)l, result);
%% 	return result;
%% }
%% 
%%@@ -222,14 +222,16 @@
%%  */
%% 
%% int32
%%-i2toi4(int16 arg1)
%%+i2toi4(Datum arg1)
%% {
%% 	return (int32) arg1;
%% }
%% 
%% int16
%%-i4toi2(int32 arg1)
%%+i4toi2(Datum arg)
%% {
%%+	int32 arg1 = (int32) arg;
%%+
%% 	if (arg1 < SHRT_MIN)
%% 		elog(ERROR, "i4toi2: '%d' causes int2 underflow", arg1);
%% 	if (arg1 > SHRT_MAX)
%%@@ -239,7 +241,7 @@
%% }
%% 
%% text *
%%-int2_text(int16 arg1)
%%+int2_text(Datum arg1)
%% {
%% 	text	   *result;
%% 
%%@@ -280,7 +282,7 @@
%% }	/* text_int2() */
%% 
%% text *
%%-int4_text(int32 arg1)
%%+int4_text(Datum arg1)
%% {
%% 	text	   *result;
%% 
%%@@ -336,154 +338,154 @@
%%  *		intge			- returns 1 iff arg1 >= arg2
%%  */
%% bool
%%-int4eq(int32 arg1, int32 arg2)
%%+int4eq(Datum arg1, Datum arg2)
%% {
%%-	return arg1 == arg2;
%%+	return (int32)arg1 == (int32)arg2;
%% }
%% 
%% bool
%%-int4ne(int32 arg1, int32 arg2)
%%+int4ne(Datum arg1, Datum arg2)
%% {
%%-	return arg1 != arg2;
%%+	return (int32)arg1 != (int32)arg2;
%% }
%% 
%% bool
%%-int4lt(int32 arg1, int32 arg2)
%%+int4lt(Datum arg1, Datum arg2)
%% {
%%-	return arg1 < arg2;
%%+	return (int32)arg1 < (int32)arg2;
%% }
%% 
%% bool
%%-int4le(int32 arg1, int32 arg2)
%%+int4le(Datum arg1, Datum arg2)
%% {
%%-	return arg1 <= arg2;
%%+	return (int32)arg1 <= (int32)arg2;
%% }
%% 
%% bool
%%-int4gt(int32 arg1, int32 arg2)
%%+int4gt(Datum arg1, Datum arg2)
%% {
%%-	return arg1 > arg2;
%%+	return (int32)arg1 > (int32)arg2;
%% }
%% 
%% bool
%%-int4ge(int32 arg1, int32 arg2)
%%+int4ge(Datum arg1, Datum arg2)
%% {
%%-	return arg1 >= arg2;
%%+	return (int32)arg1 >= (int32)arg2;
%% }
%% 
%% bool
%%-int2eq(int16 arg1, int16 arg2)
%%+int2eq(Datum arg1, Datum arg2)
%% {
%%-	return arg1 == arg2;
%%+	return (int16)arg1 == (int16)arg2;
%% }
%% 
%% bool
%%-int2ne(int16 arg1, int16 arg2)
%%+int2ne(Datum arg1, Datum arg2)
%% {
%%-	return arg1 != arg2;
%%+	return (int16)arg1 != (int16)arg2;
%% }
%% 
%% bool
%%-int2lt(int16 arg1, int16 arg2)
%%+int2lt(Datum arg1, Datum arg2)
%% {
%%-	return arg1 < arg2;
%%+	return (int16)arg1 < (int16)arg2;
%% }
%% 
%% bool
%%-int2le(int16 arg1, int16 arg2)
%%+int2le(Datum arg1, Datum arg2)
%% {
%%-	return arg1 <= arg2;
%%+	return (int16)arg1 <= (int16)arg2;
%% }
%% 
%% bool
%%-int2gt(int16 arg1, int16 arg2)
%%+int2gt(Datum arg1, Datum arg2)
%% {
%%-	return arg1 > arg2;
%%+	return (int16)arg1 > (int16)arg2;
%% }
%% 
%% bool
%%-int2ge(int16 arg1, int16 arg2)
%%+int2ge(Datum arg1, Datum arg2)
%% {
%%-	return arg1 >= arg2;
%%+	return (int16)arg1 >= (int16)arg2;
%% }
%% 
%% bool
%%-int24eq(int32 arg1, int32 arg2)
%%+int24eq(Datum arg1, Datum arg2)
%% {
%%-	return arg1 == arg2;
%%+	return (int32)arg1 == (int32)arg2;
%% }
%% 
%% bool
%%-int24ne(int32 arg1, int32 arg2)
%%+int24ne(Datum arg1, Datum arg2)
%% {
%%-	return arg1 != arg2;
%%+	return (int32)arg1 != (int32)arg2;
%% }
%% 
%% bool
%%-int24lt(int32 arg1, int32 arg2)
%%+int24lt(Datum arg1, Datum arg2)
%% {
%%-	return arg1 < arg2;
%%+	return (int32)arg1 < (int32)arg2;
%% }
%% 
%% bool
%%-int24le(int32 arg1, int32 arg2)
%%+int24le(Datum arg1, Datum arg2)
%% {
%%-	return arg1 <= arg2;
%%+	return (int32)arg1 <= (int32)arg2;
%% }
%% 
%% bool
%%-int24gt(int32 arg1, int32 arg2)
%%+int24gt(Datum arg1, Datum arg2)
%% {
%%-	return arg1 > arg2;
%%+	return (int32)arg1 > (int32)arg2;
%% }
%% 
%% bool
%%-int24ge(int32 arg1, int32 arg2)
%%+int24ge(Datum arg1, Datum arg2)
%% {
%%-	return arg1 >= arg2;
%%+	return (int32)arg1 >= (int32)arg2;
%% }
%% 
%% bool
%%-int42eq(int32 arg1, int32 arg2)
%%+int42eq(Datum arg1, Datum arg2)
%% {
%%-	return arg1 == arg2;
%%+	return (int32)arg1 == (int32)arg2;
%% }
%% 
%% bool
%%-int42ne(int32 arg1, int32 arg2)
%%+int42ne(Datum arg1, Datum arg2)
%% {
%%-	return arg1 != arg2;
%%+	return (int32)arg1 != (int32)arg2;
%% }
%% 
%% bool
%%-int42lt(int32 arg1, int32 arg2)
%%+int42lt(Datum arg1, Datum arg2)
%% {
%%-	return arg1 < arg2;
%%+	return (int32)arg1 < (int32)arg2;
%% }
%% 
%% bool
%%-int42le(int32 arg1, int32 arg2)
%%+int42le(Datum arg1, Datum arg2)
%% {
%%-	return arg1 <= arg2;
%%+	return (int32)arg1 <= (int32)arg2;
%% }
%% 
%% bool
%%-int42gt(int32 arg1, int32 arg2)
%%+int42gt(Datum arg1, Datum arg2)
%% {
%%-	return arg1 > arg2;
%%+	return (int32)arg1 > (int32)arg2;
%% }
%% 
%% bool
%%-int42ge(int32 arg1, int32 arg2)
%%+int42ge(Datum arg1, Datum arg2)
%% {
%%-	return arg1 >= arg2;
%%+	return (int32)arg1 >= (int32)arg2;
%% }
%% 
%% 
%% bool
%%-keyfirsteq(int16 *arg1, int16 arg2)
%%+keyfirsteq(int16 *arg1, Datum arg2)
%% {
%%-	return *arg1 == arg2;
%%+	return *arg1 == (int16)arg2;
%% }
%% 
%% /*
%%@@ -493,159 +495,160 @@
%%  *		int[24]div		- returns arg1 / arg2
%%  */
%% int32
%%-int4um(int32 arg)
%%+int4um(Datum arg)
%% {
%%-	return -arg;
%%+	return (int32)-arg;
%% }
%% 
%% int32
%%-int4pl(int32 arg1, int32 arg2)
%%+int4pl(Datum arg1, Datum arg2)
%% {
%%-	return arg1 + arg2;
%%+	return (int32)arg1 + (int32)arg2;
%% }
%% 
%% int32
%%-int4mi(int32 arg1, int32 arg2)
%%+int4mi(Datum arg1, Datum arg2)
%% {
%%-	return arg1 - arg2;
%%+	return (int32)arg1 - (int32)arg2;
%% }
%% 
%% int32
%%-int4mul(int32 arg1, int32 arg2)
%%+int4mul(Datum arg1, Datum arg2)
%% {
%%-	return arg1 * arg2;
%%+	return (int32)arg1 * (int32)arg2;
%% }
%% 
%% int32
%%-int4div(int32 arg1, int32 arg2)
%%+int4div(Datum arg1, Datum arg2)
%% {
%%-	return arg1 / arg2;
%%+	return (int32)arg1 / (int32)arg2;
%% }
%% 
%% int32
%%-int4inc(int32 arg)
%%+int4inc(Datum arg)
%% {
%%-	return arg + (int32) 1;
%%+	return (int32)++arg;
%% }
%% 
%% int16
%%-int2um(int16 arg)
%%+int2um(Datum arg)
%% {
%%-	return -arg;
%%+	return (int16)-arg;
%% }
%% 
%% int16
%%-int2pl(int16 arg1, int16 arg2)
%%+int2pl(Datum arg1, Datum arg2)
%% {
%%-	return arg1 + arg2;
%%+	return (int16)arg1 + (int16)arg2;
%% }
%% 
%% int16
%%-int2mi(int16 arg1, int16 arg2)
%%+int2mi(Datum arg1, Datum arg2)
%% {
%%-	return arg1 - arg2;
%%+	return (int16)arg1 - (int16)arg2;
%% }
%% 
%% int16
%%-int2mul(int16 arg1, int16 arg2)
%%+int2mul(Datum arg1, Datum arg2)
%% {
%%-	return arg1 * arg2;
%%+	return (int16)arg1 * (int16)arg2;
%% }
%% 
%% int16
%%-int2div(int16 arg1, int16 arg2)
%%+int2div(Datum arg1, Datum arg2)
%% {
%%-	return arg1 / arg2;
%%+	return (int16)arg1 / (int16)arg2;
%% }
%% 
%% int16
%%-int2inc(int16 arg)
%%+int2inc(Datum arg)
%% {
%%-	return arg + (int16) 1;
%%+	return (int16)++arg;
%% }
%% 
%% int32
%%-int24pl(int32 arg1, int32 arg2)
%%+int24pl(Datum arg1, Datum arg2)
%% {
%%-	return arg1 + arg2;
%%+	return (int32)arg1 + (int32)arg2;
%% }
%% 
%% int32
%%-int24mi(int32 arg1, int32 arg2)
%%+int24mi(Datum arg1, Datum arg2)
%% {
%%-	return arg1 - arg2;
%%+	return (int32)arg1 - (int32)arg2;
%% }
%% 
%% int32
%%-int24mul(int32 arg1, int32 arg2)
%%+int24mul(Datum arg1, Datum arg2)
%% {
%%-	return arg1 * arg2;
%%+	return (int32)arg1 * (int32)arg2;
%% }
%% 
%% int32
%%-int24div(int32 arg1, int32 arg2)
%%+int24div(Datum arg1, Datum arg2)
%% {
%%-	return arg1 / arg2;
%%+	return (int32)arg1 / (int32)arg2;
%% }
%% 
%% int32
%%-int42pl(int32 arg1, int32 arg2)
%%+int42pl(Datum arg1, Datum arg2)
%% {
%%-	return arg1 + arg2;
%%+	return (int32)arg1 + (int32)arg2;
%% }
%% 
%% int32
%%-int42mi(int32 arg1, int32 arg2)
%%+int42mi(Datum arg1, Datum arg2)
%% {
%%-	return arg1 - arg2;
%%+	return (int32)arg1 - (int32)arg2;
%% }
%% 
%% int32
%%-int42mul(int32 arg1, int32 arg2)
%%+int42mul(Datum arg1, Datum arg2)
%% {
%%-	return arg1 * arg2;
%%+	return (int32)arg1 * (int32)arg2;
%% }
%% 
%% int32
%%-int42div(int32 arg1, int32 arg2)
%%+int42div(Datum arg1, Datum arg2)
%% {
%%-	return arg1 / arg2;
%%+	return (int32)arg1 / (int32)arg2;
%% }
%% 
%% /*
%%  *		int[24]mod		- returns arg1 mod arg2
%%  */
%% int32
%%-int4mod(int32 arg1, int32 arg2)
%%+int4mod(Datum arg1, Datum arg2)
%% {
%%-	return arg1 % arg2;
%%+	return (int32)arg1 % (int32)arg2;
%% }
%% 
%% int32
%%-int2mod(int16 arg1, int16 arg2)
%%+int2mod(Datum arg1, Datum arg2)
%% {
%%-	return arg1 % arg2;
%%+	return (int16)arg1 % (int16)arg2;
%% }
%% 
%% int32
%%-int24mod(int32 arg1, int32 arg2)
%%+int24mod(Datum arg1, Datum arg2)
%% {
%%-	return arg1 % arg2;
%%+	return (int32)arg1 % (int32)arg2;
%% }
%% 
%% int32
%%-int42mod(int32 arg1, int32 arg2)
%%+int42mod(Datum arg1, Datum arg2)
%% {
%%-	return arg1 % arg2;
%%+	return (int32)arg1 % (int32)arg2;
%% }
%% 
%% /*
%%  *		int[24]fac		- returns arg1!
%%  */
%% int32
%%-int4fac(int32 arg1)
%%+int4fac(Datum arg)
%% {
%% 	int32		result;
%%+	int32	arg1 = (int32) arg;
%% 
%% 	if (arg1 < 1)
%% 		result = 0;
%%@@ -656,9 +659,10 @@
%% }
%% 
%% int32
%%-int2fac(int16 arg1)
%%+int2fac(Datum arg)
%% {
%% 	int16		result;
%%+	int16		arg1 = (int16) arg;
%% 
%% 	if (arg1 < 1)
%% 		result = 0;
%%@@ -669,25 +673,25 @@
%% }
%% 
%% int16
%%-int2larger(int16 arg1, int16 arg2)
%%+int2larger(Datum arg1, Datum arg2)
%% {
%%-	return (arg1 > arg2) ? arg1 : arg2;
%%+	return ((int16)arg1 > (int16)arg2) ? (int16)arg1 : (int16)arg2;
%% }
%% 
%% int16
%%-int2smaller(int16 arg1, int16 arg2)
%%+int2smaller(Datum arg1, Datum arg2)
%% {
%%-	return (arg1 < arg2) ? arg1 : arg2;
%%+	return ((int16)arg1 < (int16)arg2) ? (int16)arg1 : (int16)arg2;
%% }
%% 
%% int32
%%-int4larger(int32 arg1, int32 arg2)
%%+int4larger(Datum arg1, Datum arg2)
%% {
%%-	return (arg1 > arg2) ? arg1 : arg2;
%%+	return ((int32)arg1 > (int32)arg2) ? (int32)arg1 : (int32)arg2;
%% }
%% 
%% int32
%%-int4smaller(int32 arg1, int32 arg2)
%%+int4smaller(Datum arg1, Datum arg2)
%% {
%%-	return (arg1 < arg2) ? arg1 : arg2;
%%+	return ((int32)arg1 < (int32)arg2) ? (int32)arg1 : (int32)arg2;
%% }
%%diff -ruN postgresql-6.5.2/src/backend/utils/adt/nabstime.c postgresql-patched/src/backend/utils/adt/nabstime.c
%%--- postgresql-6.5.2/src/backend/utils/adt/nabstime.c	Mon Aug  2 01:24:54 1999
%%+++ postgresql-patched/src/backend/utils/adt/nabstime.c	Fri Oct 29 08:40:10 1999
%%@@ -124,11 +124,11 @@
%% 
%% 
%% void
%%-abstime2tm(AbsoluteTime time, int *tzp, struct tm * tm, char *tzn)
%%+abstime2tm(Datum time, int *tzp, struct tm * tm, char *tzn)
%% {
%% #ifdef USE_POSIX_TIME
%% 	struct tm  *tx;
%%-
%%+	time_t	t = (time_t) time;
%% #else							/* ! USE_POSIX_TIME */
%% 	struct timeb tb;			/* the old V7-ism */
%% 
%%@@ -137,10 +137,10 @@
%% 
%% #ifdef USE_POSIX_TIME
%% 	if (tzp != NULL)
%%-		tx = localtime((time_t *) &time);
%%+		tx = localtime( &t );
%% 	else
%% 	{
%%-		tx = gmtime((time_t *) &time);
%%+		tx = gmtime( &t );
%% 	};
%% #endif
%% 
%%@@ -210,8 +210,8 @@
%% static AbsoluteTime
%% tm2abstime(struct tm * tm, int tz)
%% {
%%-	int			day,
%%-				sec;
%%+	int			day;
%%+	AbsoluteTime		sec;
%% 
%% 	/* validate, before going out of range on some members */
%% 	if (tm->tm_year < 1901 || tm->tm_year > 2038
%%@@ -317,8 +317,9 @@
%%  * Given an AbsoluteTime return the English text version of the date
%%  */
%% char *
%%-nabstimeout(AbsoluteTime time)
%%+nabstimeout(Datum t)
%% {
%%+	AbsoluteTime time = (AbsoluteTime) t;
%% 	char	   *result;
%% 	int			tz;
%% 	double		fsec = 0;
%%@@ -363,8 +364,10 @@
%%  *	AbsoluteTimeIsBefore -- true iff time1 is after time2.
%%  */
%% bool
%%-AbsoluteTimeIsBefore(AbsoluteTime time1, AbsoluteTime time2)
%%+AbsoluteTimeIsBefore(Datum t1, Datum t2)
%% {
%%+	AbsoluteTime time1 = t1,  time2 = t2;
%%+
%% 	Assert(AbsoluteTimeIsValid(time1));
%% 	Assert(AbsoluteTimeIsValid(time2));
%% 
%%@@ -379,8 +382,10 @@
%% 
%% #ifdef NOT_USED
%% bool
%%-AbsoluteTimeIsAfter(AbsoluteTime time1, AbsoluteTime time2)
%%+AbsoluteTimeIsAfter(Datum t1, Datum t2)
%% {
%%+	AbsoluteTime time1 = t1,  time2 = t2;
%%+
%% 	Assert(AbsoluteTimeIsValid(time1));
%% 	Assert(AbsoluteTimeIsValid(time2));
%% 
%%@@ -398,8 +403,10 @@
%% /* abstime_finite()
%%  */
%% bool
%%-abstime_finite(AbsoluteTime abstime)
%%+abstime_finite(Datum d)
%% {
%%+	AbsoluteTime abstime = (AbsoluteTime) d;
%%+
%% 	return ((abstime != INVALID_ABSTIME)
%% 		  && (abstime != NOSTART_ABSTIME) && (abstime != NOEND_ABSTIME));
%% }	/* abstime_finite() */
%%@@ -414,8 +421,10 @@
%%  *		abstimege		- returns 1, iff t1 greater than or equal to t2
%%  */
%% bool
%%-abstimeeq(AbsoluteTime t1, AbsoluteTime t2)
%%+abstimeeq(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1, t2 = d2;
%%+
%% 	if (t1 == INVALID_ABSTIME || t2 == INVALID_ABSTIME)
%% 		return FALSE;
%% 	if (t1 == CURRENT_ABSTIME)
%%@@ -427,8 +436,10 @@
%% }
%% 
%% bool
%%-abstimene(AbsoluteTime t1, AbsoluteTime t2)
%%+abstimene(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1, t2 = d2;
%%+
%% 	if (t1 == INVALID_ABSTIME || t2 == INVALID_ABSTIME)
%% 		return FALSE;
%% 	if (t1 == CURRENT_ABSTIME)
%%@@ -440,8 +451,10 @@
%% }
%% 
%% bool
%%-abstimelt(AbsoluteTime t1, AbsoluteTime t2)
%%+abstimelt(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1, t2 = d2;
%%+
%% 	if (t1 == INVALID_ABSTIME || t2 == INVALID_ABSTIME)
%% 		return FALSE;
%% 	if (t1 == CURRENT_ABSTIME)
%%@@ -453,8 +466,10 @@
%% }
%% 
%% bool
%%-abstimegt(AbsoluteTime t1, AbsoluteTime t2)
%%+abstimegt(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1, t2 = d2;
%%+
%% 	if (t1 == INVALID_ABSTIME || t2 == INVALID_ABSTIME)
%% 		return FALSE;
%% 	if (t1 == CURRENT_ABSTIME)
%%@@ -466,8 +481,10 @@
%% }
%% 
%% bool
%%-abstimele(AbsoluteTime t1, AbsoluteTime t2)
%%+abstimele(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1, t2 = d2;
%%+
%% 	if (t1 == INVALID_ABSTIME || t2 == INVALID_ABSTIME)
%% 		return FALSE;
%% 	if (t1 == CURRENT_ABSTIME)
%%@@ -479,8 +496,10 @@
%% }
%% 
%% bool
%%-abstimege(AbsoluteTime t1, AbsoluteTime t2)
%%+abstimege(Datum d1, Datum d2)
%% {
%%+	AbsoluteTime t1 = d1, t2 = d2;
%%+
%% 	if (t1 == INVALID_ABSTIME || t2 == INVALID_ABSTIME)
%% 		return FALSE;
%% 	if (t1 == CURRENT_ABSTIME)
%%@@ -550,8 +569,9 @@
%%  * Convert abstime to datetime.
%%  */
%% DateTime   *
%%-abstime_datetime(AbsoluteTime abstime)
%%+abstime_datetime(Datum a)
%% {
%%+	AbsoluteTime abstime = (AbsoluteTime) a;
%% 	DateTime   *result;
%% 
%% 	if (!PointerIsValid(result = palloc(sizeof(DateTime))))
%%diff -ruN postgresql-6.5.2/src/backend/utils/adt/numeric.c postgresql-patched/src/backend/utils/adt/numeric.c
%%--- postgresql-6.5.2/src/backend/utils/adt/numeric.c	Mon Aug  2 01:24:55 1999
%%+++ postgresql-patched/src/backend/utils/adt/numeric.c	Fri Oct 29 08:40:10 1999
%%@@ -166,7 +166,7 @@
%%  * ----------
%%  */
%% Numeric
%%-numeric_in(char *str, int dummy, int32 typmod)
%%+numeric_in(char *str, int dummy, Datum typmod)
%% {
%% 	NumericVar	value;
%% 	Numeric		res;
%%@@ -196,7 +196,7 @@
%% 	init_var(&value);
%% 	set_var_from_str(str, &value);
%% 
%%-	apply_typmod(&value, typmod);
%%+	apply_typmod(&value, (int32)typmod);
%% 
%% 	res = make_result(&value);
%% 	free_var(&value);
%%@@ -1643,8 +1643,9 @@
%%  * ----------------------------------------------------------------------
%%  */
%% Numeric
%%-int4_numeric(int32 val)
%%+int4_numeric(Datum v)
%% {
%%+	int32 val = v;
%% 	Numeric		res;
%% 	NumericVar	result;
%% 	char	   *tmp;
%%diff -ruN postgresql-6.5.2/src/backend/utils/adt/oid.c postgresql-patched/src/backend/utils/adt/oid.c
%%--- postgresql-6.5.2/src/backend/utils/adt/oid.c	Mon Aug  2 01:24:56 1999
%%+++ postgresql-patched/src/backend/utils/adt/oid.c	Fri Oct 29 08:40:10 1999
%%@@ -175,17 +175,17 @@
%% }
%% 
%% bool
%%-oideqint4(Oid arg1, int32 arg2)
%%+oideqint4(Oid arg1, Datum arg2)
%% {
%% /* oid is unsigned, but int4 is signed */
%%-	return arg2 >= 0 && arg1 == arg2;
%%+	return (int32)arg2 >= 0 && arg1 == (int32)arg2;
%% }
%% 
%% bool
%%-int4eqoid(int32 arg1, Oid arg2)
%%+int4eqoid(Datum arg1, Oid arg2)
%% {
%% /* oid is unsigned, but int4 is signed */
%%-	return arg1 >= 0 && arg1 == arg2;
%%+	return (int32)arg1 >= 0 && (int32)arg1 == arg2;
%% }
%% 
%% text *
%%diff -ruN postgresql-6.5.2/src/backend/utils/adt/varchar.c postgresql-patched/src/backend/utils/adt/varchar.c
%%--- postgresql-6.5.2/src/backend/utils/adt/varchar.c	Mon Aug  2 01:24:58 1999
%%+++ postgresql-patched/src/backend/utils/adt/varchar.c	Fri Oct 29 08:40:10 1999
%%@@ -60,8 +60,9 @@
%%  *	  because we pass typelem as the second argument for array_in.)
%%  */
%% char *
%%-bpcharin(char *s, int dummy, int32 atttypmod)
%%+bpcharin(char *s, Datum dummy, Datum a)
%% {
%%+	int32 atttypmod = a;
%% 	char	   *result,
%% 			   *r;
%% 	int			len;
%%@@ -137,8 +138,9 @@
%%  * len is the length specified in () plus VARHDRSZ bytes.
%%  */
%% char *
%%-bpchar(char *s, int32 len)
%%+bpchar(char *s, Datum l)
%% {
%%+	int32 len = l;
%% 	char	   *result,
%% 			   *r;
%% 	int			rlen,
%%@@ -212,9 +214,9 @@
%%  * len is the length specified in () plus VARHDRSZ bytes.
%%  */
%% ArrayType  *
%%-_bpchar(ArrayType *v, int32 len)
%%+_bpchar(ArrayType *v, Datum len)
%% {
%%-	return array_map(v, BPCHAROID, bpchar, BPCHAROID, 1, len);
%%+	return array_map(v, BPCHAROID, bpchar, BPCHAROID, 1, (int32)len);
%% }
%% 
%% 
%%@@ -231,7 +233,7 @@
%%  * Convert char to bpchar(1).
%%  */
%% char *
%%-char_bpchar(int32 c)
%%+char_bpchar(Datum c)
%% {
%% 	char	   *result;
%% 
%%@@ -323,8 +325,9 @@
%%  *	  because we pass typelem as the second argument for array_in.)
%%  */
%% char *
%%-varcharin(char *s, int dummy, int32 atttypmod)
%%+varcharin(char *s, int dummy, Datum a)
%% {
%%+	int32 atttypmod = a;
%% 	char	   *result;
%% 	int			len;
%% 
%%@@ -381,8 +384,9 @@
%%  * slen is the length specified in () plus VARHDRSZ bytes.
%%  */
%% char *
%%-varchar(char *s, int32 slen)
%%+varchar(char *s, Datum ds)
%% {
%%+	int32	slen = ds;
%% 	char	   *result;
%% 	int			len;
%% 
%%@@ -423,9 +427,9 @@
%%  * len is the length specified in () plus VARHDRSZ bytes.
%%  */
%% ArrayType  *
%%-_varchar(ArrayType *v, int32 len)
%%+_varchar(ArrayType *v, Datum len)
%% {
%%-	return array_map(v, VARCHAROID, varchar, VARCHAROID, 1, len);
%%+	return array_map(v, VARCHAROID, varchar, VARCHAROID, 1, (int32)len);
%% }
%% 
%% 
%%diff -ruN postgresql-6.5.2/src/backend/utils/adt/varlena.c postgresql-patched/src/backend/utils/adt/varlena.c
%%--- postgresql-6.5.2/src/backend/utils/adt/varlena.c	Mon Aug  2 01:24:58 1999
%%+++ postgresql-patched/src/backend/utils/adt/varlena.c	Fri Oct 29 08:40:10 1999
%%@@ -325,8 +325,9 @@
%%  * - Thomas Lockhart 1998-12-10
%%  */
%% text *
%%-text_substr(text *string, int32 m, int32 n)
%%+text_substr(text *string, Datum dm, Datum dn)
%% {
%%+	int32 m = dm, n = dn;
%% 	text	   *ret;
%% 	int			len;
%% 
%%diff -ruN postgresql-6.5.2/src/include/access/hash.h postgresql-patched/src/include/access/hash.h
%%--- postgresql-6.5.2/src/include/access/hash.h	Mon Aug  2 01:25:21 1999
%%+++ postgresql-patched/src/include/access/hash.h	Fri Oct 29 08:40:10 1999
%%@@ -262,14 +262,14 @@
%% extern void hashdelete(Relation rel, ItemPointer tid);
%% 
%% /* hashfunc.c */
%%-extern uint32 hashint2(int16 key);
%%-extern uint32 hashint4(uint32 key);
%%+extern uint32 hashint2(Datum key);
%%+extern uint32 hashint4(Datum key);
%% extern uint32 hashint8(int64 *key);
%% extern uint32 hashfloat4(float32 keyp);
%% extern uint32 hashfloat8(float64 keyp);
%% extern uint32 hashoid(Oid key);
%% extern uint32 hashoid8(Oid *key);
%%-extern uint32 hashchar(char key);
%%+extern uint32 hashchar(Datum key);
%% extern uint32 hashtext(struct varlena * key);
%% extern uint32 hashname(NameData *n);
%% 
%%diff -ruN postgresql-6.5.2/src/include/utils/builtins.h postgresql-patched/src/include/utils/builtins.h
%%--- postgresql-6.5.2/src/include/utils/builtins.h	Mon Aug  2 01:25:24 1999
%%+++ postgresql-patched/src/include/utils/builtins.h	Fri Oct 29 08:40:10 1999
%%@@ -46,93 +46,93 @@
%% 
%% /* char.c */
%% extern int32 charin(char *ch);
%%-extern char *charout(int32 ch);
%%+extern char *charout(Datum ch);
%% extern int32 cidin(char *s);
%%-extern char *cidout(int32 c);
%%-extern bool chareq(int8 arg1, int8 arg2);
%%-extern bool charne(int8 arg1, int8 arg2);
%%-extern bool charlt(int8 arg1, int8 arg2);
%%-extern bool charle(int8 arg1, int8 arg2);
%%-extern bool chargt(int8 arg1, int8 arg2);
%%-extern bool charge(int8 arg1, int8 arg2);
%%-extern int8 charpl(int8 arg1, int8 arg2);
%%-extern int8 charmi(int8 arg1, int8 arg2);
%%-extern int8 charmul(int8 arg1, int8 arg2);
%%-extern int8 chardiv(int8 arg1, int8 arg2);
%%-extern bool cideq(int8 arg1, int8 arg2);
%%+extern char *cidout(Datum c);
%%+extern bool chareq(Datum arg1, Datum arg2);
%%+extern bool charne(Datum arg1, Datum arg2);
%%+extern bool charlt(Datum arg1, Datum arg2);
%%+extern bool charle(Datum arg1, Datum arg2);
%%+extern bool chargt(Datum arg1, Datum arg2);
%%+extern bool charge(Datum arg1, Datum arg2);
%%+extern int8 charpl(Datum arg1, Datum arg2);
%%+extern int8 charmi(Datum arg1, Datum arg2);
%%+extern int8 charmul(Datum arg1, Datum arg2);
%%+extern int8 chardiv(Datum arg1, Datum arg2);
%%+extern bool cideq(Datum arg1, Datum arg2);
%% extern int8 text_char(text *arg1);
%%-extern text *char_text(int8 arg1);
%%+extern text *char_text(Datum arg1);
%% 
%% /* int.c */
%% extern int32 int2in(char *num);
%%-extern char *int2out(int16 sh);
%%+extern char *int2out(Datum sh);
%% extern int16 *int28in(char *shs);
%% extern char *int28out(int16 *shs);
%% extern int32 *int44in(char *input_string);
%% extern char *int44out(int32 *an_array);
%% extern int32 int4in(char *num);
%%-extern char *int4out(int32 l);
%%-extern int32 i2toi4(int16 arg1);
%%-extern int16 i4toi2(int32 arg1);
%%-extern text *int2_text(int16 arg1);
%%+extern char *int4out(Datum l);
%%+extern int32 i2toi4(Datum arg1);
%%+extern int16 i4toi2(Datum arg1);
%%+extern text *int2_text(Datum arg1);
%% extern int16 text_int2(text *arg1);
%%-extern text *int4_text(int32 arg1);
%%+extern text *int4_text(Datum arg1);
%% extern int32 text_int4(text *arg1);
%%-extern bool int4eq(int32 arg1, int32 arg2);
%%-extern bool int4ne(int32 arg1, int32 arg2);
%%-extern bool int4lt(int32 arg1, int32 arg2);
%%-extern bool int4le(int32 arg1, int32 arg2);
%%-extern bool int4gt(int32 arg1, int32 arg2);
%%-extern bool int4ge(int32 arg1, int32 arg2);
%%-extern bool int2eq(int16 arg1, int16 arg2);
%%-extern bool int2ne(int16 arg1, int16 arg2);
%%-extern bool int2lt(int16 arg1, int16 arg2);
%%-extern bool int2le(int16 arg1, int16 arg2);
%%-extern bool int2gt(int16 arg1, int16 arg2);
%%-extern bool int2ge(int16 arg1, int16 arg2);
%%-extern bool int24eq(int32 arg1, int32 arg2);
%%-extern bool int24ne(int32 arg1, int32 arg2);
%%-extern bool int24lt(int32 arg1, int32 arg2);
%%-extern bool int24le(int32 arg1, int32 arg2);
%%-extern bool int24gt(int32 arg1, int32 arg2);
%%-extern bool int24ge(int32 arg1, int32 arg2);
%%-extern bool int42eq(int32 arg1, int32 arg2);
%%-extern bool int42ne(int32 arg1, int32 arg2);
%%-extern bool int42lt(int32 arg1, int32 arg2);
%%-extern bool int42le(int32 arg1, int32 arg2);
%%-extern bool int42gt(int32 arg1, int32 arg2);
%%-extern bool int42ge(int32 arg1, int32 arg2);
%%-extern bool keyfirsteq(int16 *arg1, int16 arg2);
%%-extern int32 int4um(int32 arg);
%%-extern int32 int4pl(int32 arg1, int32 arg2);
%%-extern int32 int4mi(int32 arg1, int32 arg2);
%%-extern int32 int4mul(int32 arg1, int32 arg2);
%%-extern int32 int4div(int32 arg1, int32 arg2);
%%-extern int32 int4inc(int32 arg);
%%-extern int16 int2um(int16 arg);
%%-extern int16 int2pl(int16 arg1, int16 arg2);
%%-extern int16 int2mi(int16 arg1, int16 arg2);
%%-extern int16 int2mul(int16 arg1, int16 arg2);
%%-extern int16 int2div(int16 arg1, int16 arg2);
%%-extern int16 int2inc(int16 arg);
%%-extern int32 int24pl(int32 arg1, int32 arg2);
%%-extern int32 int24mi(int32 arg1, int32 arg2);
%%-extern int32 int24mul(int32 arg1, int32 arg2);
%%-extern int32 int24div(int32 arg1, int32 arg2);
%%-extern int32 int42pl(int32 arg1, int32 arg2);
%%-extern int32 int42mi(int32 arg1, int32 arg2);
%%-extern int32 int42mul(int32 arg1, int32 arg2);
%%-extern int32 int42div(int32 arg1, int32 arg2);
%%-extern int32 int4mod(int32 arg1, int32 arg2);
%%-extern int32 int2mod(int16 arg1, int16 arg2);
%%-extern int32 int24mod(int32 arg1, int32 arg2);
%%-extern int32 int42mod(int32 arg1, int32 arg2);
%%-extern int32 int4fac(int32 arg1);
%%-extern int32 int2fac(int16 arg1);
%%-extern int16 int2larger(int16 arg1, int16 arg2);
%%-extern int16 int2smaller(int16 arg1, int16 arg2);
%%-extern int32 int4larger(int32 arg1, int32 arg2);
%%-extern int32 int4smaller(int32 arg1, int32 arg2);
%%+extern bool int4eq(Datum arg1, Datum arg2);
%%+extern bool int4ne(Datum arg1, Datum arg2);
%%+extern bool int4lt(Datum arg1, Datum arg2);
%%+extern bool int4le(Datum arg1, Datum arg2);
%%+extern bool int4gt(Datum arg1, Datum arg2);
%%+extern bool int4ge(Datum arg1, Datum arg2);
%%+extern bool int2eq(Datum arg1, Datum arg2);
%%+extern bool int2ne(Datum arg1, Datum arg2);
%%+extern bool int2lt(Datum arg1, Datum arg2);
%%+extern bool int2le(Datum arg1, Datum arg2);
%%+extern bool int2gt(Datum arg1, Datum arg2);
%%+extern bool int2ge(Datum arg1, Datum arg2);
%%+extern bool int24eq(Datum arg1, Datum arg2);
%%+extern bool int24ne(Datum arg1, Datum arg2);
%%+extern bool int24lt(Datum arg1, Datum arg2);
%%+extern bool int24le(Datum arg1, Datum arg2);
%%+extern bool int24gt(Datum arg1, Datum arg2);
%%+extern bool int24ge(Datum arg1, Datum arg2);
%%+extern bool int42eq(Datum arg1, Datum arg2);
%%+extern bool int42ne(Datum arg1, Datum arg2);
%%+extern bool int42lt(Datum arg1, Datum arg2);
%%+extern bool int42le(Datum arg1, Datum arg2);
%%+extern bool int42gt(Datum arg1, Datum arg2);
%%+extern bool int42ge(Datum arg1, Datum arg2);
%%+extern bool keyfirsteq(int16 *arg1, Datum arg2);
%%+extern int32 int4um(Datum arg);
%%+extern int32 int4pl(Datum arg1, Datum arg2);
%%+extern int32 int4mi(Datum arg1, Datum arg2);
%%+extern int32 int4mul(Datum arg1, Datum arg2);
%%+extern int32 int4div(Datum arg1, Datum arg2);
%%+extern int32 int4inc(Datum arg);
%%+extern int16 int2um(Datum arg);
%%+extern int16 int2pl(Datum arg1, Datum arg2);
%%+extern int16 int2mi(Datum arg1, Datum arg2);
%%+extern int16 int2mul(Datum arg1, Datum arg2);
%%+extern int16 int2div(Datum arg1, Datum arg2);
%%+extern int16 int2inc(Datum arg);
%%+extern int32 int24pl(Datum arg1, Datum arg2);
%%+extern int32 int24mi(Datum arg1, Datum arg2);
%%+extern int32 int24mul(Datum arg1, Datum arg2);
%%+extern int32 int24div(Datum arg1, Datum arg2);
%%+extern int32 int42pl(Datum arg1, Datum arg2);
%%+extern int32 int42mi(Datum arg1, Datum arg2);
%%+extern int32 int42mul(Datum arg1, Datum arg2);
%%+extern int32 int42div(Datum arg1, Datum arg2);
%%+extern int32 int4mod(Datum arg1, Datum arg2);
%%+extern int32 int2mod(Datum arg1, Datum arg2);
%%+extern int32 int24mod(Datum arg1, Datum arg2);
%%+extern int32 int42mod(Datum arg1, Datum arg2);
%%+extern int32 int4fac(Datum arg1);
%%+extern int32 int2fac(Datum arg1);
%%+extern int16 int2larger(Datum arg1, Datum arg2);
%%+extern int16 int2smaller(Datum arg1, Datum arg2);
%%+extern int32 int4larger(Datum arg1, Datum arg2);
%%+extern int32 int4smaller(Datum arg1, Datum arg2);
%% 
%% /* name.c */
%% extern NameData *namein(char *s);
%%@@ -160,17 +160,17 @@
%%  *		Per-opclass comparison functions for new btrees.  These are
%%  *		stored in pg_amproc and defined in nbtree/
%%  */
%%-extern int32 btint2cmp(int16 a, int16 b);
%%-extern int32 btint4cmp(int32 a, int32 b);
%%+extern int32 btint2cmp(Datum a, Datum b);
%%+extern int32 btint4cmp(Datum a, Datum b);
%% extern int32 btint8cmp(int64 *a, int64 *b);
%%-extern int32 btint24cmp(int16 a, int32 b);
%%-extern int32 btint42cmp(int32 a, int16 b);
%%+extern int32 btint24cmp(Datum a, Datum b);
%%+extern int32 btint42cmp(Datum a, Datum b);
%% extern int32 btfloat4cmp(float32 a, float32 b);
%% extern int32 btfloat8cmp(float64 a, float64 b);
%% extern int32 btoidcmp(Oid a, Oid b);
%% extern int32 btoid8cmp(Oid *a, Oid *b);
%%-extern int32 btabstimecmp(AbsoluteTime a, AbsoluteTime b);
%%-extern int32 btcharcmp(char a, char b);
%%+extern int32 btabstimecmp(Datum a, Datum b);
%%+extern int32 btcharcmp(Datum a, Datum b);
%% extern int32 btnamecmp(NameData *a, NameData *b);
%% extern int32 bttextcmp(struct varlena * a, struct varlena * b);
%% 
%%@@ -195,25 +195,25 @@
%% 
%% /* date.c */
%% extern RelativeTime reltimein(char *timestring);
%%-extern char *reltimeout(RelativeTime timevalue);
%%+extern char *reltimeout(Datum timevalue);
%% extern TimeInterval tintervalin(char *intervalstr);
%% extern char *tintervalout(TimeInterval interval);
%% extern RelativeTime timespan_reltime(TimeSpan *timespan);
%%-extern TimeSpan *reltime_timespan(RelativeTime reltime);
%%-extern TimeInterval mktinterval(AbsoluteTime t1, AbsoluteTime t2);
%%-extern AbsoluteTime timepl(AbsoluteTime t1, RelativeTime t2);
%%-extern AbsoluteTime timemi(AbsoluteTime t1, RelativeTime t2);
%%+extern TimeSpan *reltime_timespan(Datum reltime);
%%+extern TimeInterval mktinterval(Datum t1, Datum t2);
%%+extern AbsoluteTime timepl(Datum t1, Datum t2);
%%+extern AbsoluteTime timemi(Datum t1, Datum t2);
%% 
%%-/* extern RelativeTime abstimemi(AbsoluteTime t1, AbsoluteTime t2);  static*/
%%-extern int	ininterval(AbsoluteTime t, TimeInterval interval);
%%+/* extern RelativeTime abstimemi(Datum t1, Datum t2);  static*/
%%+extern int	ininterval(Datum t, TimeInterval interval);
%% extern RelativeTime intervalrel(TimeInterval interval);
%% extern AbsoluteTime timenow(void);
%%-extern bool reltimeeq(RelativeTime t1, RelativeTime t2);
%%-extern bool reltimene(RelativeTime t1, RelativeTime t2);
%%-extern bool reltimelt(RelativeTime t1, RelativeTime t2);
%%-extern bool reltimegt(RelativeTime t1, RelativeTime t2);
%%-extern bool reltimele(RelativeTime t1, RelativeTime t2);
%%-extern bool reltimege(RelativeTime t1, RelativeTime t2);
%%+extern bool reltimeeq(Datum t1, Datum t2);
%%+extern bool reltimene(Datum t1, Datum t2);
%%+extern bool reltimelt(Datum t1, Datum t2);
%%+extern bool reltimegt(Datum t1, Datum t2);
%%+extern bool reltimele(Datum t1, Datum t2);
%%+extern bool reltimege(Datum t1, Datum t2);
%% extern bool intervalsame(TimeInterval i1, TimeInterval i2);
%% extern bool intervaleq(TimeInterval i1, TimeInterval i2);
%% extern bool intervalne(TimeInterval i1, TimeInterval i2);
%%@@ -221,12 +221,12 @@
%% extern bool intervalgt(TimeInterval i1, TimeInterval i2);
%% extern bool intervalle(TimeInterval i1, TimeInterval i2);
%% extern bool intervalge(TimeInterval i1, TimeInterval i2);
%%-extern bool intervalleneq(TimeInterval i, RelativeTime t);
%%-extern bool intervallenne(TimeInterval i, RelativeTime t);
%%-extern bool intervallenlt(TimeInterval i, RelativeTime t);
%%-extern bool intervallengt(TimeInterval i, RelativeTime t);
%%-extern bool intervallenle(TimeInterval i, RelativeTime t);
%%-extern bool intervallenge(TimeInterval i, RelativeTime t);
%%+extern bool intervalleneq(TimeInterval i, Datum t);
%%+extern bool intervallenne(TimeInterval i, Datum t);
%%+extern bool intervallenlt(TimeInterval i, Datum t);
%%+extern bool intervallengt(TimeInterval i, Datum t);
%%+extern bool intervallenle(TimeInterval i, Datum t);
%%+extern bool intervallenge(TimeInterval i, Datum t);
%% extern bool intervalct(TimeInterval i1, TimeInterval i2);
%% extern bool intervalov(TimeInterval i1, TimeInterval i2);
%% extern AbsoluteTime intervalstart(TimeInterval i);
%%@@ -274,13 +274,13 @@
%% extern bool float8gt(float64 arg1, float64 arg2);
%% extern bool float8ge(float64 arg1, float64 arg2);
%% extern float64 ftod(float32 num);
%%-extern float64 i4tod(int32 num);
%%-extern float64 i2tod(int16 num);
%%+extern float64 i4tod(Datum num);
%%+extern float64 i2tod(Datum num);
%% extern float32 dtof(float64 num);
%% extern int32 dtoi4(float64 num);
%% extern int16 dtoi2(float64 num);
%%-extern float32 i4tof(int32 num);
%%-extern float32 i2tof(int16 num);
%%+extern float32 i4tof(Datum num);
%%+extern float32 i2tof(Datum num);
%% extern int32 ftoi4(float32 num);
%% extern int16 ftoi2(float32 num);
%% extern float64 text_float8(text *str);
%%@@ -346,8 +346,8 @@
%% extern bool oid8le(Oid *arg1, Oid *arg2);
%% extern bool oid8ge(Oid *arg1, Oid *arg2);
%% extern bool oid8gt(Oid *arg1, Oid *arg2);
%%-extern bool oideqint4(Oid arg1, int32 arg2);
%%-extern bool int4eqoid(int32 arg1, Oid arg2);
%%+extern bool oideqint4(Oid arg1, Datum arg2);
%%+extern bool int4eqoid(Datum arg1, Oid arg2);
%% extern text *oid_text(Oid arg1);
%% extern Oid	text_oid(text *arg1);
%% 
%%@@ -407,11 +407,11 @@
%% time_t		datetime_timestamp(DateTime *datetime);
%% 
%% /* varchar.c */
%%-extern char *bpcharin(char *s, int dummy, int32 atttypmod);
%%+extern char *bpcharin(char *s, Datum dummy, Datum atttypmod);
%% extern char *bpcharout(char *s);
%%-extern char *bpchar(char *s, int32 slen);
%%-extern ArrayType *_bpchar(ArrayType *v, int32 slen);
%%-extern char *char_bpchar(int32 c);
%%+extern char *bpchar(char *s, Datum slen);
%%+extern ArrayType *_bpchar(ArrayType *v, Datum slen);
%%+extern char *char_bpchar(Datum c);
%% extern int32 bpchar_char(char *s);
%% extern char *name_bpchar(NameData *s);
%% extern NameData *bpchar_name(char *s);
%%@@ -426,10 +426,10 @@
%% extern int32 bpcharoctetlen(char *arg);
%% extern uint32 hashbpchar(struct varlena * key);
%% 
%%-extern char *varcharin(char *s, int dummy, int32 atttypmod);
%%+extern char *varcharin(char *s, int dummy, Datum atttypmod);
%% extern char *varcharout(char *s);
%%-extern char *varchar(char *s, int32 slen);
%%-extern ArrayType *_varchar(ArrayType *v, int32 slen);
%%+extern char *varchar(char *s, Datum slen);
%%+extern ArrayType *_varchar(ArrayType *v, Datum slen);
%% extern bool varchareq(char *arg1, char *arg2);
%% extern bool varcharne(char *arg1, char *arg2);
%% extern bool varcharlt(char *arg1, char *arg2);
%%@@ -457,7 +457,7 @@
%% extern int32 textlen(text *arg);
%% extern int32 textoctetlen(text *arg);
%% extern int32 textpos(text *arg1, text *arg2);
%%-extern text *text_substr(text *string, int32 m, int32 n);
%%+extern text *text_substr(text *string, Datum m, Datum n);
%% extern text *name_text(NameData *s);
%% extern NameData *text_name(text *s);
%% 
%%@@ -563,7 +563,7 @@
%% text	   *macaddr_manuf(macaddr *addr);
%% 
%% /* numeric.c */
%%-Numeric		numeric_in(char *str, int dummy, int32 typmod);
%%+Numeric		numeric_in(char *str, int dummy, Datum typmod);
%% char	   *numeric_out(Numeric num);
%% Numeric		numeric(Numeric num, int32 typmod);
%% Numeric		numeric_abs(Numeric num);
%%@@ -592,7 +592,7 @@
%% Numeric		numeric_ln(Numeric num);
%% Numeric		numeric_log(Numeric num1, Numeric num2);
%% Numeric		numeric_power(Numeric num1, Numeric num2);
%%-Numeric		int4_numeric(int32 val);
%%+Numeric		int4_numeric(Datum val);
%% int32		numeric_int4(Numeric num);
%% Numeric		float4_numeric(float32 val);
%% float32		numeric_float4(Numeric num);
%%diff -ruN postgresql-6.5.2/src/include/utils/nabstime.h postgresql-patched/src/include/utils/nabstime.h
%%--- postgresql-6.5.2/src/include/utils/nabstime.h	Tue May 25 12:14:56 1999
%%+++ postgresql-patched/src/include/utils/nabstime.h	Fri Oct 29 08:40:10 1999
%%@@ -28,8 +28,8 @@
%%  * is 64-bits.	Therefore, typedef these both as simply 'time_t', and let
%%  * the OS define what the size really is. -- RME 3/5/99
%%  */
%%-typedef time_t AbsoluteTime;
%%-typedef time_t RelativeTime;
%%+typedef int32 AbsoluteTime;
%%+typedef int32 RelativeTime;
%% 
%% typedef struct
%% {
%%@@ -107,21 +107,21 @@
%%  * nabstime.c prototypes
%%  */
%% extern AbsoluteTime nabstimein(char *timestr);
%%-extern char *nabstimeout(AbsoluteTime time);
%%+extern char *nabstimeout(Datum time);
%% 
%%-extern bool abstimeeq(AbsoluteTime t1, AbsoluteTime t2);
%%-extern bool abstimene(AbsoluteTime t1, AbsoluteTime t2);
%%-extern bool abstimelt(AbsoluteTime t1, AbsoluteTime t2);
%%-extern bool abstimegt(AbsoluteTime t1, AbsoluteTime t2);
%%-extern bool abstimele(AbsoluteTime t1, AbsoluteTime t2);
%%-extern bool abstimege(AbsoluteTime t1, AbsoluteTime t2);
%%-extern bool abstime_finite(AbsoluteTime time);
%%+extern bool abstimeeq(Datum t1, Datum t2);
%%+extern bool abstimene(Datum t1, Datum t2);
%%+extern bool abstimelt(Datum t1, Datum t2);
%%+extern bool abstimegt(Datum t1, Datum t2);
%%+extern bool abstimele(Datum t1, Datum t2);
%%+extern bool abstimege(Datum t1, Datum t2);
%%+extern bool abstime_finite(Datum time);
%% 
%% extern AbsoluteTime datetime_abstime(DateTime *datetime);
%%-extern DateTime *abstime_datetime(AbsoluteTime abstime);
%%+extern DateTime *abstime_datetime(Datum abstime);
%% 
%%-extern bool AbsoluteTimeIsBefore(AbsoluteTime time1, AbsoluteTime time2);
%%+extern bool AbsoluteTimeIsBefore(Datum time1, Datum time2);
%% 
%%-extern void abstime2tm(AbsoluteTime time, int *tzp, struct tm * tm, char *tzn);
%%+extern void abstime2tm(Datum time, int *tzp, struct tm * tm, char *tzn);
%% 
%% #endif	 /* NABSTIME_H */
%%diff -ruN postgresql-6.5.2/src/template/linux_alpha postgresql-patched/src/template/linux_alpha
%%--- postgresql-6.5.2/src/template/linux_alpha	Thu Jul 29 23:26:29 1999
%%+++ postgresql-patched/src/template/linux_alpha	Fri Oct 29 08:40:31 1999
%%@@ -1,5 +1,5 @@
%% AROPT:crs
%%-CFLAGS:-O2
%%+CFLAGS:
%% SHARED_LIB:-fpic
%% ALL:
%% SRCH_INC:
%%
%%