Movatterモバイル変換


[0]ホーム

URL:


Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

Sign up
Appearance settings
/perl5Public

Returning state hash-assign risks "Bizarre copy of HASH in subroutine exit" #18630

Closed
Assignees
richardleach
Labels
@fecundf

Description

@fecundf

Description
This code gives the errorBizarre copy of HASH in subroutine exit

Steps to Reproduce

sub tt {state %h=(a=>1)}print tt; # prints a1print tt; # error `Bizarre copy of HASH in subroutine exit`

Expected behavior
both lines to print "a1"

Perl configuration

Summary of my perl5 (revision 5 version 32 subversion 1) configuration:     Platform:    osname=darwin    osvers=20.2.0    archname=darwin-2level    uname='darwin yarys-apple-sauce 20.2.0 darwin kernel version 20.2.0: wed dec 2 20:39:59 pst 2020; root:xnu-7195.60.75~1release_x86_64 x86_64 '    config_args='-de -Dprefix=/Users/hluchan/perl5/perlbrew/perls/perl-5.32.1 -Aeval:scriptdir=/Users/hluchan/perl5/perlbrew/perls/perl-5.32.1/bin'    hint=recommended    useposix=true    d_sigaction=define    useithreads=undef    usemultiplicity=undef    use64bitint=define    use64bitall=define    uselongdouble=undef    usemymalloc=n    default_inc_excludes_dot=define    bincompat5005=undef  Compiler:    cc='cc'    ccflags ='-fno-common -DPERL_DARWIN -mmacosx-version-min=11.1 -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include -I/opt/local/include -DPERL_USE_SAFE_PUTENV'    optimize='-O3'    cppflags='-fno-common -DPERL_DARWIN -mmacosx-version-min=11.1 -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include -I/opt/local/include'    ccversion=''    gccversion='Apple LLVM 12.0.0 (clang-1200.0.32.28)'    gccosandvers=''    intsize=4    longsize=8    ptrsize=8    doublesize=8    byteorder=12345678    doublekind=3    d_longlong=define    longlongsize=8    d_longdbl=define    longdblsize=16    longdblkind=3    ivtype='long'    ivsize=8    nvtype='double'    nvsize=8    Off_t='off_t'    lseeksize=8    alignbytes=8    prototype=define  Linker and Libraries:    ld='cc'    ldflags =' -mmacosx-version-min=11.1 -fstack-protector-strong -L/usr/local/lib -L/opt/local/lib'    libpth=/usr/local/lib /Library/Developer/CommandLineTools/usr/lib/clang/12.0.0/lib /Library/Developer/CommandLineTools/SDKs/MacOSX.sdk/usr/lib /Library/Developer/CommandLineTools/usr/lib /opt/local/lib /usr/lib    libs=-lgdbm    perllibs=    libc=    so=dylib    useshrplib=false    libperl=libperl.a    gnulibc_version=''  Dynamic Linking:    dlsrc=dl_dlopen.xs    dlext=bundle    d_dlsymun=undef    ccdlflags=' '    cccdlflags=' '    lddlflags=' -mmacosx-version-min=11.1 -bundle -undefined dynamic_lookup -L/usr/local/lib -L/opt/local/lib -fstack-protector-strong'Characteristics of this binary (from libperl):   Compile-time options:    HAS_TIMES    PERLIO_LAYERS    PERL_COPY_ON_WRITE    PERL_DONT_CREATE_GVSV    PERL_MALLOC_WRAP    PERL_OP_PARENT    PERL_PRESERVE_IVUV    PERL_USE_SAFE_PUTENV    USE_64_BIT_ALL    USE_64_BIT_INT    USE_LARGE_FILES    USE_LOCALE    USE_LOCALE_COLLATE    USE_LOCALE_CTYPE    USE_LOCALE_NUMERIC    USE_LOCALE_TIME    USE_PERLIO    USE_PERL_ATOF  Built under darwin  Compiled at Jan 25 2021 12:29:31  %ENV:    PERLBREW_HOME="/Users/hluchan/.perlbrew"    PERLBREW_MANPATH="/Users/hluchan/perl5/perlbrew/perls/perl-5.32.1/man"    PERLBREW_PATH="/Users/hluchan/perl5/perlbrew/bin:/Users/hluchan/perl5/perlbrew/perls/perl-5.32.1/bin"    PERLBREW_PERL="perl-5.32.1"    PERLBREW_ROOT="/Users/hluchan/perl5/perlbrew"    PERLBREW_SHELLRC_VERSION="0.87"    PERLBREW_VERSION="0.87"    PERL_CPANM_OPT="--mirror https://hwte.apple.com/repo/CPAN --mirror-only"  @INC:    /Users/hluchan/perl5/perlbrew/perls/perl-5.32.1/lib/site_perl/5.32.1/darwin-2level    /Users/hluchan/perl5/perlbrew/perls/perl-5.32.1/lib/site_perl/5.32.1    /Users/hluchan/perl5/perlbrew/perls/perl-5.32.1/lib/5.32.1/darwin-2level    /Users/hluchan/perl5/perlbrew/perls/perl-5.32.1/lib/5.32.1

Metadata

Metadata

Assignees

Labels

Type

No type

Projects

No projects

Milestone

No milestone

Relationships

None yet

Development

No branches or pull requests

Issue actions


    [8]ページ先頭

    ©2009-2025 Movatter.jp