Index: src/func.c
==================================================================
--- src/func.c
+++ src/func.c
@@ -1015,11 +1015,11 @@
   int argc,
   sqlite3_value **argv
 ){
   unsigned char *z, *zOut;
   int i;
-  zOut = z = sqlite3_malloc( argc*4 );
+  zOut = z = sqlite3_malloc( argc*4+1 );
   if( z==0 ){
     sqlite3_result_error_nomem(context);
     return;
   }
   for(i=0; i<argc; i++){

Index: test/func.test
==================================================================
--- test/func.test
+++ test/func.test
@@ -1359,6 +1359,11 @@
 }
 for {set i 65536} {$i<=0x10ffff} {incr i 139} {
   do_execsql_test func-30.5.$i {SELECT unicode(char($i))} $i
 }
 
+# Test char().
+#
+do_execsql_test func-31.1 { 
+  SELECT char(), length(char()), typeof(char()) 
+} {{} 0 text}
 finish_test