5 use Test::More tests => 1; # last test to print
7 use Devel::Declare 'method' => sub{};
13 is lowercase("FOO\x{263a}"), "foo\x{263a}";
17 This test segfaults for me on rev 4944:
19 gdb --args perl -I blib/arch -I blib/lib t/segv_utf8_lc.t
21 #0 0xb7ca9a70 in dd_ck_const () from blib/arch/auto/Devel/Declare/Declare.so
22 #1 0x0806be8d in Perl_vload_module ()
23 #2 0x0806bfdc in Perl_load_module ()
24 #3 0x080fa343 in Perl_swash_init ()
25 #4 0x080fbb1b in Perl_to_utf8_case ()
26 #5 0x080fbf97 in Perl_to_utf8_lower ()
27 #6 0x080bdfb8 in Perl_pp_lc ()
28 #7 0x080a3e0e in Perl_runops_standard ()
29 #8 0x080a0420 in perl_run ()
30 #9 0x080623a5 in main ()
33 Summary of my perl5 (revision 5 version 10 subversion 0) configuration:
35 osname=linux, osvers=2.6.24-19-386, archname=i686-linux
36 uname='linux schutz 2.6.24-19-386 #1 wed jun 18 14:09:56 utc 2008 i686 gnulinux '
37 config_args='-Dprefix=/opt/perl'
38 hint=recommended, useposix=true, d_sigaction=define
39 useithreads=undef, usemultiplicity=undef
40 useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
41 use64bitint=undef, use64bitall=undef, uselongdouble=undef
42 usemymalloc=n, bincompat5005=undef
44 cc='cc', ccflags ='-fno-strict-aliasing -pipe -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
46 cppflags='-fno-strict-aliasing -pipe -I/usr/local/include'
47 ccversion='', gccversion='4.2.3 (Ubuntu 4.2.3-2ubuntu7)', gccosandvers=''
48 intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
49 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
50 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
51 alignbytes=4, prototype=define
53 ld='cc', ldflags =' -L/usr/local/lib'
54 libpth=/usr/local/lib /lib /usr/lib
55 libs=-lnsl -ldl -lm -lcrypt -lutil -lc
56 perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc
57 libc=/lib/libc-2.7.so, so=so, useshrplib=false, libperl=libperl.a
60 dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
61 cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib'
64 Characteristics of this binary (from libperl):
65 Compile-time options: PERL_DONT_CREATE_GVSV PERL_MALLOC_WRAP
66 USE_LARGE_FILES USE_PERLIO
68 Compiled at Jul 4 2008 02:57:13
70 PERL5LIB="/home/rhesa/perl:/home/expman/mod_perl_scripts/cpan:/home/expman/mod_perl_scripts"
73 /home/expman/mod_perl_scripts/cpan
74 /home/expman/mod_perl_scripts
75 /opt/perl/lib/5.10.0/i686-linux
77 /opt/perl/lib/site_perl/5.10.0/i686-linux
78 /opt/perl/lib/site_perl/5.10.0