+++ /dev/null
-# Copyright 2000-2003 Double Precision, Inc.
-# See COPYING for distribution information.
-#
-# $Id: charsetlist.pl,v 1.2 2003/03/07 00:47:31 mrsam Exp $
-
-my @chset;
-my @structname;
-
-print "#include \"unicode_config.h\"\n";
-print "#include \"unicode.h\"\n";
-while (<>)
-{
- chomp;
-
-my ($chset, $structname)=split(/[ \t]+/);
-
- push @chset, $chset;
- push @structname, $structname;
-}
-
-for ($i=0; $i <= $#structname; $i++)
-{
- printf("extern const struct unicode_info $structname[$i];\n");
-}
-
-print "const struct unicode_chsetlist unicode_chsetlist[] = {\n";
-
-for ($i=0; $i <= $#structname; $i++)
-{
- printf("{\"$chset[$i]\", &$structname[$i]},\n");
-}
-
-printf("{0,0}};\n");