Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

"Attempt to free unreferenced scalar." with tie/STORE/local $_ #1061

Closed
p5pRT opened this issue Jan 20, 2000 · 3 comments
Closed

"Attempt to free unreferenced scalar." with tie/STORE/local $_ #1061

p5pRT opened this issue Jan 20, 2000 · 3 comments
Labels
distro-freebsd Not a Bug

Comments

@p5pRT
Copy link

p5pRT commented Jan 20, 2000

Migrated from rt.perl.org#2012 (status was 'resolved')

Searchable as RT2012$
@p5pRT
Copy link
Author

p5pRT commented Jan 20, 2000

From lyonsm@bob.globalmediacorp.com

The following code snippet reproducably produces the error
"Attempt to free unreferenced scalar at ./spew_error.pl line 10."

If you remove one of the assignments to %h the error changes to "Attempt
to free unreferenced scalar." If you remove two of them the error goes
away.

I've tried pruning the test case down even further, but this is the
smallest I've been able to get it.

I've reproduced this on perl version 5.005_03 on both i386-freebsd and
i386-linux.

#!/usr/bin/perl

sub TIEHASH { bless {} }
sub STORE { local($_[1])=$_[1] }

tie %h, 'main';

$h{1}=1;
$h{1}=1;
$h{1}=1;

__END__

Perl Info 


Site configuration information for perl 5.00503:

Configured by markm at $Date: 1999/05/05 19:42:40 $.

Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration:
  Platform:
    osname=freebsd, osvers=4.0-current, archname=i386-freebsd
    uname='freebsd freefall.freebsd.org 4.0-current freebsd 4.0-current #0: $Date: 1999/05/05 19:42:40 $'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef useperlio=undef d_sfio=undef
  Compiler:
    cc='cc', optimize='undef', gccversion=egcs-2.91.66 19990314 (egcs-1.1.2 release)
    cppflags=''
    ccflags =''
    stdchar='char', d_stdstdio=undef, usevfork=true
    intsize=4, longsize=4, ptrsize=4, doublesize=8
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    alignbytes=4, usemymalloc=n, prototype=define
  Linker and Libraries:
    ld='cc', ldflags ='-Wl,-E'
    libpth=/usr/lib
    libs=-lm -lc -lcrypt
    libc=/usr/lib/libc.so, so=so, useshrplib=true, libperl=libperl.so.3
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags=' '
    cccdlflags='-DPIC -fpic', lddlflags='-shared'

Locally applied patches:
    


@INC for perl 5.00503:
    /usr/libdata/perl/5.00503/mach
    /usr/libdata/perl/5.00503
    /usr/local/lib/perl5/site_perl/5.005/i386-freebsd
    /usr/local/lib/perl5/site_perl/5.005
    .


Environment for perl 5.00503:
    HOME=/home/lyonsm
    LANG (unset)
    LANGUAGE (unset)
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
    PATH=/sbin:/bin:/usr/sbin:/usr/bin:/usr/games:/usr/local/bin:/usr/local/sbin:/usr/X11R6/bin:/var/qmail/bin:/home/lyonsm/bin
    PERL_BADLANG (unset)
    SHELL=/bin/bash

@p5pRT
Copy link
Author

p5pRT commented Apr 22, 2003

From @iabyn

(I'm just reviewing old Perl bug reports).

This bug has been fixed in the latest development version of Perl (by
patch #19064), and has also been integrated into Perl 5.8.1-to-be, which
will be released in a few months time.

Dave M.

@p5pRT
Copy link
Author

p5pRT commented Apr 22, 2003

@iabyn - Status changed from 'open' to 'resolved'

@p5pRT p5pRT closed this as completed Apr 22, 2003
@p5pRT p5pRT mentioned this issue Oct 19, 2019
Closed
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Assignees
No one assigned
Labels
distro-freebsd Not a Bug
Projects
None yet
Milestone
No milestone
Development

No branches or pull requests
1 participant
@p5pRT