Skip Menu |
Report information
Id: 5210
Status: rejected
Priority: 0/
Queue: perl5

Owner: Nobody
Requestors: madison [at]

Operating System: Linux
PatchStatus: (no value)
Severity: medium
Type: 5005threads
Perl Version: 5.6.0
Fixed In: (no value)

From: David Madison <madison [...]>
Date: Tue, 16 Jan 2001 15:00:21 -0800
To: perlbug [...]
Subject: perlcall(1) examples don't work with perl 5.6.0 with threads
Cc: madison [...]
Download (untitled) / with headers
text/plain 3.6k
----------------------------------------------------------------- [Please enter your report here] I tried compiling the simple example in the perlcall manpage with a threaded perl 5.60, I've been able to use the perlcall routines fine with my perl 5.005_03 ------------------------- dSP; PUSHMARK(sp); perl_call_pv("some_func", G_DISCARD|G_NOARGS); ------------------------- And I get unfortunate error: `thr' undeclared (first use this function) Seems that the perl macros are being expanded to use some "thr" object: ------------------------- extern int Perl___notused ; register SV **sp = (thr ->Tstack_sp) ; if (++ (thr ->Tmarkstack_ptr) == (thr ->Tmarkstack_max) ) Perl_markstack_grow(thr ) ; * (thr ->Tmarkstack_ptr) = ( sp ) - (thr ->Tstack_base) ; Perl_call_pv(thr , "call" , 2 | 8 ) ; ------------------------- What is this thr object? [Please do not change anything below this line] ----------------------------------------------------------------- --- This perlbug was built using Perl 5.00503 - Mon Aug 30 23:08:56 EDT 1999 It is being executed now by Perl 5.006 - Sat Jan 13 17:44:23 PST 2001. Site configuration information for perl 5.006: Configured by madison at Sat Jan 13 17:44:23 PST 2001. Summary of my perl5 (revision 5.0 version 6 subversion 0) configuration: Platform: osname=linux, osvers=2.2.14, archname=i686-linux-thread-multi uname='linux madison 2.2.14 #1 smp wed jan 26 18:32:50 pst 2000 i686 unknown ' config_args='-Dusethreads -Duse5005threads' hint=previous, useposix=true, d_sigaction=define usethreads=define use5005threads=define useithreads=undef usemultiplicity=undef useperlio=undef d_sfio=undef uselargefiles=define use64bitint=undef use64bitall=undef uselongdouble=undef usesocks=undef Compiler: cc='cc', optimize='-O2', gccversion=egcs-2.91.66 19990314/Linux (egcs-1.1.2 release) cppflags='-D_REENTRANT -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64' ccflags ='-D_REENTRANT -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64' stdchar='char', d_stdstdio=define, usevfork=false intsize=4, longsize=4, ptrsize=4, doublesize=8 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=4, usemymalloc=n, prototype=define Linker and Libraries: ld='cc', ldflags =' -L/usr/local/lib' libpth=/usr/local/lib /lib /usr/lib libs=-lnsl -lndbm -lgdbm -ldl -lm -lpthread -lc -lposix -lcrypt libc=/lib/, so=so, useshrplib=false, libperl=libperl.a Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic' cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib' Locally applied patches: --- @INC for perl 5.006: /opt/perl/lib/5.6.0/i686-linux-thread-multi /opt/perl/lib/5.6.0 /opt/perl/lib/site_perl/5.6.0/i686-linux-thread-multi /opt/perl/lib/site_perl/5.6.0 /opt/perl/lib/site_perl . --- Environment for perl 5.006: HOME=/home/madison LANG (unset) LANGUAGE (unset) LD_LIBRARY_PATH (unset) LOGDIR (unset) PATH=/home/madison/bin/i386-linux-libc6:/home/madison/bin:/usr/local/bin/i386-linux-libc6:/usr/local/bin:/usr/local/contrib/bin:/bin:/usr/bin:/usr/X11R6/bin:.:/proj/validation/bin/i386-linux-libc6:/proj/validation/bin:/proj/hw/bin/i386-linux-libc6:/proj/hw/bin:/proj/sw/r5/fred/i386-linux-libc6/bin:/cad/polaris/current/exe:/cad/innologic/current/scripts:/cad/scripts:/cad/ssi/current/bin/:/usr/local/lsf/bin:/usr/local/contrib/bin PERL_BADLANG (unset) SHELL=/bin/tcsh
Download (untitled) / with headers
text/plain 104b
5.005 threads have been deprecated and will be removed in 5.10. Please consider using ithreads instead.

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

For issues related to this RT instance (aka "perlbug"), please contact perlbug-admin at