gen-table.pl: Const-ify output.

	* gen-table.pl: Const-ify output.  Document the location of a
	suitable unicode input file.

	* chartables.h: Regenerate.

From-SVN: r48354

gcc/java/ChangeLog

+2001-12-28  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
+
+	* gen-table.pl: Const-ify output.  Document the location of a
+	suitable unicode input file.
+
+	* chartables.h: Regenerate.
+
 2001-12-26  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
 
 	* chartables.h: Const-ify.

gcc/java/chartables.h

 /* This file is automatically generated.  DO NOT EDIT!
    Instead, edit gen-table.pl and re-run.  */
 
-#ifndef CHARTABLES_H
-#define CHARTABLES_H
+#ifndef GCC_CHARTABLES_H
+#define GCC_CHARTABLES_H
 
 #define LETTER_START 1
 #define LETTER_PART  2
@@ -3209,4 +3209,4 @@ static const char *const type_table[256] = {
   page255
 };
 
-#endif /* CHARTABLES_H */
+#endif /* ! GCC_CHARTABLES_H */

gcc/java/gen-table.pl

@@ -19,6 +19,10 @@
 
 # gen-table.pl - Generate tables for gcj from Unicode data.
 # Usage: perl gen-table.pl DATA-FILE
+#
+# A suitable DATA-FILE is available at:
+# ftp://www.unicode.org/Public/3.0-Update/UnicodeData-3.0.0.txt
+
 
 # Names of fields in Unicode data table.
 $CODE = 0;
@@ -191,11 +195,11 @@ sub print_tables
 
     for ($count = 0; $count <= $last; $count += 256)
     {
-	$row[$count / 256] = &print_row ($count, '(char *) ', 'char', 1,
+	$row[$count / 256] = &print_row ($count, '(char *) ', 'const char', 1,
 					 'page');
     }
 
-    print OUT "static char *type_table[256] = {\n";
+    print OUT "static const char *const type_table[256] = {\n";
     for ($count = 0; $count <= $last; $count += 256)
     {
 	print OUT ",\n" if $count > 0;