gen-table.pl: Don't process characters after \uffff.

* gen-table.pl: Don't process characters after \uffff.  Added
	comment pointing to input file.

From-SVN: r48359
This commit is contained in:
Tom Tromey 2001-12-29 04:31:10 +00:00 committed by Tom Tromey
parent 0b622c4a1e
commit dab722ee86
2 changed files with 14 additions and 4 deletions

View File

@ -1,3 +1,8 @@
2001-12-28 Tom Tromey <tromey@redhat.com>
* gen-table.pl: Don't process characters after \uffff. Added
comment pointing to input file.
2001-12-28 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* gen-table.pl: Const-ify output. Document the location of a

View File

@ -1,6 +1,6 @@
#! /usr/bin/perl
# Copyright (C) 2000 Free Software Foundation
# Copyright (C) 2000, 2001 Free Software Foundation
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@ -20,9 +20,13 @@
# 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
# You can find the Unicode data file here:
# ftp://www.unicode.org/Public/3.0-Update1/UnicodeData-3.0.1.txt
# Please update this URL when this program is used with a more
# recent version of the table. Note that this table cannot be
# distributed with gcc.
# This program should not be re-run indiscriminately. Care must be
# taken that what it generates is in sync with the Java specification.
# Names of fields in Unicode data table.
$CODE = 0;
@ -80,6 +84,7 @@ while (<INPUT>)
}
$code = hex ($fields[$CODE]);
last if $code > 0xffff;
if ($code > $last_code + 1)
{
# Found a gap.