develooper Front page | perl.perl5.porters | Postings from March 2012

uni/opcroak.t (Re: [perl.git] branch blead,updated. v5.15.9-26-g84cf752)

From:
Craig A. Berry
Date:
March 27, 2012 16:51
Subject:
uni/opcroak.t (Re: [perl.git] branch blead,updated. v5.15.9-26-g84cf752)
Message ID:
craigberry-FD78EA.18505227032012@cpc2-bmly6-0-0-cust974.2-3.cable.virginmedia.com
In article <E1SB7Nf-0006Um-Gl@camel.ams6.corp.booking.com>,
 sprout@cpan.org ("Father Chrysostomos") wrote:

> In perl.git, the branch blead has been updated
> 
> <http://perl5.git.perl.org/perl.git/commitdiff/84cf752cf4667896f0ad1025fbb58f1
> ddf04ecdc?hp=654dfe5293a435f777e47f6587931541a3006cbd>
> 
> - Log -----------------------------------------------------------------
> commit 84cf752cf4667896f0ad1025fbb58f1ddf04ecdc
> Author: Father Chrysostomos <sprout@cpan.org>
> Date:   Fri Mar 23 08:52:23 2012 -0700
> 
>     Use HEKf in 2 places in op.c:S_finalize_op
>     
>     The previous patch was written before HEKf existed.
>     HEKf with HEKfARG(...) is much faster than SVf with
>     SVfARG(sv_2mortal(newSVhek(...)))


> --- /dev/null
> +++ b/t/uni/opcroak.t

This new test is not entirely happy with -DDEBUGGING and PERL_DESTRUCT_LEVEL:

% setenv PERL_DESTRUCT_LEVEL 2
% ./perl -I../lib uni/opcroak.t
1..5
ok 1 - Not enough arguments croak is UTF-8 clean
ok 2 - Too many arguments croak is UTF-8 clean
ok 3 - bad type croak is UTF-8 clean
ok 4 - element: no such field error is UTF-8 clean
ok 5 - slice: no such field error is UTF-8 clean
Unbalanced string table refcount: (1) for "open>" during global 
destruction.
Unbalanced string table refcount: (1) for "open<" during global 
destruction.


% ./perl -I../lib -V
Summary of my perl5 (revision 5 version 15 subversion 9) configuration:
  Commit id: d03ce4f5412fd49bf3d119e68c5e987e3221dacf
  Platform:
    osname=darwin, osvers=11.3.0, archname=darwin-2level
    uname='darwin triamond.local 11.3.0 darwin kernel version 11.3.0: 
thu jan 12 18:47:41 pst 2012; root:xnu-1699.24.23~1release_x86_64 x86_64 
'
    config_args='-Dusedevel -DDEBUGGING -des'
    hint=recommended, useposix=true, d_sigaction=define
    useithreads=undef, usemultiplicity=undef
    useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
    use64bitint=define, use64bitall=define, uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-fno-common -DPERL_DARWIN -DDEBUGGING -fno-
strict-aliasing -pipe -fstack-protector -I/usr/local/include -I/opt/
local/include',
    optimize='-O3 -g',
    cppflags='-fno-common -DPERL_DARWIN -DDEBUGGING -fno-strict-aliasing 
-pipe -fstack-protector -I/usr/local/include -I/opt/local/include'
    ccversion='', gccversion='4.2.1 (Based on Apple Inc. build 5658) 
(LLVM build 2336.1.00)', gccosandvers=''
    intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
    ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', 
lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='env MACOSX_DEPLOYMENT_TARGET=10.3 cc', ldflags =' -fstack-
protector -L/usr/local/lib -L/opt/local/lib'
    libpth=/usr/local/lib /opt/local/lib /usr/lib
    libs=-ldbm -ldl -lm -lutil -lc
    perllibs=-ldl -lm -lutil -lc
    libc=, so=dylib, useshrplib=false, libperl=libperl.a
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=bundle, d_dlsymun=undef, ccdlflags=' '
    cccdlflags=' ', lddlflags=' -bundle -undefined dynamic_lookup -L/
usr/local/lib -L/opt/local/lib -fstack-protector'


Characteristics of this binary (from libperl): 
  Compile-time options: DEBUGGING HAS_TIMES PERLIO_LAYERS
                        PERL_DONT_CREATE_GVSV PERL_MALLOC_WRAP
                        PERL_PRESERVE_IVUV PERL_USE_DEVEL USE_64_BIT_ALL
                        USE_64_BIT_INT USE_LARGE_FILES USE_LOCALE
                        USE_LOCALE_COLLATE USE_LOCALE_CTYPE
                        USE_LOCALE_NUMERIC USE_PERLIO USE_PERL_ATOF
  Built under darwin
  Compiled at Mar 27 2012 07:33:30
  %ENV:
    PERL_DESTRUCT_LEVEL="2"
  @INC:
    ../lib
    /usr/local/lib/perl5/site_perl/5.15.9/darwin-2level
    /usr/local/lib/perl5/site_perl/5.15.9
    /usr/local/lib/perl5/5.15.9/darwin-2level
    /usr/local/lib/perl5/5.15.9
    /usr/local/lib/perl5/site_perl



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About