diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-17 12:56:17 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-17 12:56:17 +0000 |
| commit | 43a9ef849e866000981430cebd12dfcd9ed3f6c6 (patch) | |
| tree | 3a342ec2da17445cbc00b9ec5301688cf4a2b45c /ext/Encode/bin | |
| parent | 2be3a5525d8b4fa0f0a8b310efd278694f4d88cf (diff) | |
| download | perl-43a9ef849e866000981430cebd12dfcd9ed3f6c6.tar.gz | |
Signedness nit.
p4raw-id: //depot/perl@15969
Diffstat (limited to 'ext/Encode/bin')
| -rw-r--r-- | ext/Encode/bin/enc2xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Encode/bin/enc2xs b/ext/Encode/bin/enc2xs index 10feaf8bfa..aa99f1247a 100644 --- a/ext/Encode/bin/enc2xs +++ b/ext/Encode/bin/enc2xs @@ -261,7 +261,7 @@ if ($doC) #my @info = ($e2u->{Cname},$u2e->{Cname},$rsym,length($rep),$min_el,$max_el); my $replen = 0; $replen++ while($rep =~ /\G\\x[0-9A-Fa-f]/g); - my @info = ($e2u->{Cname},$u2e->{Cname},qq("$rep"),$replen,$min_el,$max_el); + my @info = ($e2u->{Cname},$u2e->{Cname},qq((U8*)"$rep"),$replen,$min_el,$max_el); my $sym = "${enc}_encoding"; $sym =~ s/\W+/_/g; print C "encode_t $sym = \n"; |