Add routines to help with single-byte (internal) character type support.

1 files changed, 20 insertions, 2 deletions

diff --git a/src/backend/utils/adt/char.c b/src/backend/utils/adt/char.c
index aec4bf8b192..c5dbe3faecf 100644
--- a/src/backend/utils/adt/char.c
+++ b/src/backend/utils/adt/char.c
@@ -8,7 +8,7 @@
  *
  *
  * IDENTIFICATION
- *	  $Header: /cvsroot/pgsql/src/backend/utils/adt/char.c,v 1.19 1998/09/01 03:25:50 momjian Exp $
+ *	  $Header: /cvsroot/pgsql/src/backend/utils/adt/char.c,v 1.20 1998/12/13 23:35:48 thomas Exp $
  *
  *-------------------------------------------------------------------------
  */
@@ -29,7 +29,7 @@ int32
 charin(char *ch)
 {
 	if (ch == NULL)
-		return (int32) NULL;
+		return (int32) '\0';
 	return (int32) *ch;
 }
 
@@ -153,3 +153,21 @@ cideq(int8 arg1, int8 arg2)
 {
 	return arg1 == arg2;
 }
+
+int8
+text_char(text *arg1)
+{
+	return ((int8) *(VARDATA(arg1)));
+}
+
+text *
+char_text(int8 arg1)
+{
+	text *result;
+
+	result = palloc(VARHDRSZ+1);
+	VARSIZE(result) = VARHDRSZ+1;
+	*(VARDATA(result)) = arg1;
+
+	return result;
+}