[sql] Import SQLite 3.17.0.

third_party/sqlite/src/ext/fts3/unicode/mkunicode.tcl

 
 source [file join [file dirname [info script]] parseunicode.tcl]
 
 proc print_rd {map} {
   global tl_lookup_table
   set aChar [list]
   set lRange [list]
 
   set nRange 1
   set iFirst  [lindex $map 0 0]
@@ skipping 208 matching lines @@
   puts "** Return true if the argument corresponds to a unicode codepoint"
   puts "** classified as either a letter or a number. Otherwise false."
   puts "**"
   puts "** The results are undefined if the value passed to this function"
   puts "** is less than zero."
   puts "*/"
   puts "int ${zFunc}\(int c)\{"
   an_print_range_array $lRange
   an_print_ascii_bitmap $lRange
   puts {
-  if( c<128 ){
+  if( (unsigned int)c<128 ){
     return ( (aAscii[c >> 5] & (1 << (c & 0x001F)))==0 );
-  }else if( c<(1<<22) ){
+  }else if( (unsigned int)c<(1<<22) ){
     unsigned int key = (((unsigned int)c)<<10) | 0x000003FF;
     int iRes = 0;
     int iHi = sizeof(aEntry)/sizeof(aEntry[0]) - 1;
     int iLo = 0;
     while( iHi>=iLo ){
       int iTest = (iHi + iLo) / 2;
       if( key >= aEntry[iTest] ){
         iRes = iTest;
         iLo = iTest+1;
       }else{
@@ skipping 443 matching lines @@
   print_fold_test ${function_prefix}UnicodeFold $mappings
   print_test_main 
 }
 
 if {$generate_fts5_code} {
   # no-op
 } else {
   puts "#endif /* defined(SQLITE_ENABLE_FTS3) || defined(SQLITE_ENABLE_FTS4) */"
   puts "#endif /* !defined(SQLITE_DISABLE_FTS3_UNICODE) */"
 }