Re: Enhancement request- Add CV Magic to be executed immediately before sub execution

[p5pRT]

Migrated from rt.perl.org#120284 (status was 'rejected')

Searchable as RT120284$

[p5pRT]

From [email protected]

This is a bug report for perl from PeterCMartini@​GMail.com,
generated with the help of perlbug 1.39 running under perl 5.19.5.

----------------------------------------------------------------
[Please describe your issue here]

As part of my signatures work, I'd like to add a new type of magic,
applicable to CVs only, which would execute in entersub after the
new stack, etc is setup, but before the first op of the sub is
executed.

This type of magic would be handled strictly by an API, and would
only execute if the CV has a flag indicating that the CV has this
type of magic.

(There are currently 16 flag bits available for CVs, so we're not
pressed for space there).

I've posted my work on github​:
https://github.com/PeterMartini/perl/tree/initmagic

But I'll be refactoring that commit branch to remove some of the
stupidities I'd committed accidentally before submitting them
as attached patches to p5p.

Aaaand resending, cuz I sent to p5p instead of perlbug. Doh!

[Please do not change anything below this line]
-----------------------------------------------------------------
---
Flags​:
  category=core
  severity=wishlist
---
Site configuration information for perl 5.19.5​:

Configured by pmartini at Sun Oct 20 15​:26​:12 EDT 2013.

Summary of my perl5 (revision 5 version 19 subversion 5) configuration​:
  Commit id​: 1cd5f67
  Platform​:
  osname=linux, osvers=3.8.0-31-generic, archname=x86_64-linux-thread-multi
  uname='linux pmubuntu 3.8.0-31-generic #46-ubuntu smp tue sep 10
20​:03​:44 utc 2013 x86_64 x86_64 x86_64 gnulinux '
  config_args='-Dusedevel -Dusethreads -des'
  hint=recommended, useposix=true, d_sigaction=define
  useithreads=define, usemultiplicity=define
  useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
  use64bitint=define, use64bitall=define, uselongdouble=undef
  usemymalloc=n, bincompat5005=undef
  Compiler​:
  cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing
-pipe -fstack-protector -I/usr/local/include -D_LARGEFILE_SOURCE
-D_FILE_OFFSET_BITS=64',
  optimize='-O2',
  cppflags='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe
-fstack-protector -I/usr/local/include'
  ccversion='', gccversion='4.7.3', 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='cc', ldflags =' -fstack-protector -L/usr/local/lib'
  libpth=/usr/local/lib /lib/x86_64-linux-gnu /lib/../lib
/usr/lib/x86_64-linux-gnu /usr/lib/../lib /lib /usr/lib
  libs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
  perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
  libc=, so=so, useshrplib=false, libperl=libperl.a
  gnulibc_version='2.17'
  Dynamic Linking​:
  dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
  cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib
-fstack-protector'

---
@​INC for perl 5.19.5​:
  /usr/local/lib/perl5/site_perl/5.19.5/x86_64-linux-thread-multi
  /usr/local/lib/perl5/site_perl/5.19.5
  /usr/local/lib/perl5/5.19.5/x86_64-linux-thread-multi
  /usr/local/lib/perl5/5.19.5
  .

---
Environment for perl 5.19.5​:
  HOME=/home/pmartini
  LANG=en_US.UTF-8
  LANGUAGE (unset)
  LD_LIBRARY_PATH (unset)
  LOGDIR (unset)
  PATH=/usr/lib/lightdm/lightdm​:/usr/local/sbin​:/usr/local/bin​:/usr/sbin​:/usr/bin​:/sbin​:bin​:/usr/games​:/usr/local/games
  PERL_BADLANG (unset)
  SHELL=/bin/bash

[p5pRT]

From [email protected]

Peter Martini wrote​:

As part of my signatures work, I'd like to add a new type of magic,
applicable to CVs only, which would execute in entersub after the
new stack, etc is setup, but before the first op of the sub is
executed.

What would this achieve that putting extra code at the beginning of the
sub body would not?

-zefram

[p5pRT]

The RT System itself - Status changed from 'new' to 'open'

[p5pRT]

@nwc10 - Status changed from 'open' to 'rejected'

[p5pRT]

From @nwc10

Peter confirmed that this ticket should be considered rejected in a
private reply to this list e-mail​:

http​://www.nntp.perl.org/group/perl.perl5.porters/2013/10/msg208828.html