Commit 7b0295ab by Kaveh R. Ghazi Committed by Kaveh Ghazi

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
parent 5adf72de
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> 2001-12-26 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* chartables.h: Const-ify. * chartables.h: Const-ify.
......
/* This file is automatically generated. DO NOT EDIT! /* This file is automatically generated. DO NOT EDIT!
Instead, edit gen-table.pl and re-run. */ Instead, edit gen-table.pl and re-run. */
#ifndef CHARTABLES_H #ifndef GCC_CHARTABLES_H
#define CHARTABLES_H #define GCC_CHARTABLES_H
#define LETTER_START 1 #define LETTER_START 1
#define LETTER_PART 2 #define LETTER_PART 2
...@@ -3209,4 +3209,4 @@ static const char *const type_table[256] = { ...@@ -3209,4 +3209,4 @@ static const char *const type_table[256] = {
page255 page255
}; };
#endif /* CHARTABLES_H */ #endif /* ! GCC_CHARTABLES_H */
...@@ -19,6 +19,10 @@ ...@@ -19,6 +19,10 @@
# gen-table.pl - Generate tables for gcj from Unicode data. # gen-table.pl - Generate tables for gcj from Unicode data.
# Usage: perl gen-table.pl DATA-FILE # 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. # Names of fields in Unicode data table.
$CODE = 0; $CODE = 0;
...@@ -191,11 +195,11 @@ sub print_tables ...@@ -191,11 +195,11 @@ sub print_tables
for ($count = 0; $count <= $last; $count += 256) 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'); '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) for ($count = 0; $count <= $last; $count += 256)
{ {
print OUT ",\n" if $count > 0; print OUT ",\n" if $count > 0;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment