Change 14199: [PATCH bleadperl] Shut down warnings in Normalize.c

[Jarkko Hietaniemi]

Change 14199 by jhi@alpha on 2002/01/11 23:58:00

        Subject: [PATCH bleadperl] Shut down warnings in Normalize.c          
        From: Nikola Knezevic <[EMAIL PROTECTED]>
        Date: Fri, 11 Jan 2002 16:58:14 +0100
        Message-ID: <[EMAIL PROTECTED]>

Affected files ...

.... //depot/perl/ext/Unicode/Normalize/mkheader#6 edit

Differences ...

==== //depot/perl/ext/Unicode/Normalize/mkheader#6 (text) ====
Index: perl/ext/Unicode/Normalize/mkheader
--- perl/ext/Unicode/Normalize/mkheader.~1~     Fri Jan 11 17:15:05 2002
+++ perl/ext/Unicode/Normalize/mkheader Fri Jan 11 17:15:05 2002
@@ -239,7 +239,7 @@
       next if ! $val{ $p }{ $r };
       printf "$type ${head}_%02x_%02x [256] = {\n", $p, $r;
       for(my $c = 0; $c < 256; $c++){
-        print "\t", defined $val{$p}{$r}{$c} ? $val{$p}{$r}{$c} : $null;
+        print "\t", defined $val{$p}{$r}{$c} ? "($type)".$val{$p}{$r}{$c} : $null;
         print ','  if $c != 255;
         print "\n" if $c % 8 == 7;
       }
End of Patch.