> -----Original Message-----
> From: Jarkko Hietaniemi [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, May 29, 2002 3:51 PM
> To: Nick Ing-Simmons
>
>
> On Wed, May 29, 2002 at 02:38:19PM +0100, Nick Ing-Simmons wrote:
> > Roca Carrio <[EMAIL PROTECTED]> writes:
> > >Hi,
> > >
> > >BS2000/POSIX-BC platforms use the OSD_EBCDIC_DF04_1 character set which
> > >differs from the IBM's MVS Code Page 1047.
> > >UTF-EBCDIC is based on Code Page 1047
> >
> > Not exactly. UTF-EBCDIC _Must_ use tr16 translation table or resulting
code
> > is not UTF-EBCDIC as defined by the report but some "other" rendering
> > of Unicode of your own devising.
> >
> > This may mean that which chars are "invariant" are different for other
EBCDIC
> > pages though, but that does not seem to be what your patch is affecting.
> >
> > I think the patch is wrong.
>
> Uhh, okay. So retracting the patch...
>
> Ignasi, could you show a minimal example of a "Malformed" test?
> And what does for example this show?
>
> ./perl -Ilib -MDevel::Peek -e 'Dump(chr(256))'
>
Tried
../perl -Ilib -MDevel::Peek -e 'Dump(chr(256))'
the result without problems is:
SV = PV(0x1756a10) at 0x179f42c
REFCNT = 1
FLAGS = (POK,READONLY,pPOK,UTF8)
PV = 0x17a1b18 "\214\101"\0 [UTF8 "\x{100}"]
CUR = 2
LEN = 3
Tried
../perl -Ilib -MDevel::Peek -e 'Dump(~(chr(0xEEE).chr(0x6A)))'
toke from t/op/bop.t, the result is:
Malformed UTF-8 character (unexpected continuation byte 0x6a, with no
preceding
start byte) in 1's complement (~) at -e line 1.
Malformed UTF-8 character (unexpected continuation byte 0x6a, with no
preceding
start byte) in 1's complement (~) at -e line 1.
SV = PV(0x17b69c8) at 0x17567f0
REFCNT = 1
FLAGS = (POK,READONLY,pPOK,UTF8)
PV = 0x1793e38
"\376\163\163\163\160\111\130\376\163\163\163\163\163\163"\0 [UTF8
"\x{7ffff111}\x{7fffffff}"]
CUR = 14
LEN = 15
Tried with my patch:
../perl.patched -Ilib -MDevel::Peek -e 'Dump(~(chr(0xEEE).chr(0x6A)))'
the result is:
SV = PV(0x17b69f8) at 0x17567f0
REFCNT = 1
FLAGS = (POK,READONLY,pPOK,UTF8)
PV = 0x1793e48
"\376\163\163\163\160\111\130\376\163\163\163\163\160\144"\0 [UTF8
"\x{7ffff111}\x{7fffff95}"]
CUR = 14
LEN = 15
-- Ignasi Roca.
