develooper Front page | perl.perl5.porters | Postings from June 2018

Re: broken -DPERL_MEM_LOG build

Thread Previous
From:
Karl Williamson
Date:
June 30, 2018 03:18
Subject:
Re: broken -DPERL_MEM_LOG build
Message ID:
52e862ad-8730-647e-6810-909ce198b714@khwilliamson.com
On 06/29/2018 08:27 PM, jim.cromie@gmail.com wrote:

Thanks, applied as
abb9aadc729e283764df9f7ac23799e957287bc7
>      opmini.o perlmini.o  gv.o toke.o perly.o pad.o regcomp.o dump.o
> util.o mg.o reentr.o mro_core.o keywords.o hv.o av.o run.o pp_hot.o
> sv.o pp.o scope.o pp_ctl.o pp_sys.o doop.o doio.o regexec.o utf8.o
> taint.o deb.o universal.o globals.o perlio.o perlapi.o numeric.o
> mathoms.o locale.o pp_pack.o pp_sort.o caretx.o dquote.o time64.o
> miniperlmain.o  -lpthread -ldl -lm -lcrypt -lutil -lc
> util.o: In function `S_mem_log_common':
> /home/jimc/projects/perlcore/perl/util.c:4764: undefined reference to `stren'
> /home/jimc/projects/perlcore/perl/util.c:4764: undefined reference to `stren'
> /home/jimc/projects/perlcore/perl/util.c:4764: undefined reference to `stren'
> /home/jimc/projects/perlcore/perl/util.c:4764: undefined reference to `stren'
> /home/jimc/projects/perlcore/perl/util.c:4764: undefined reference to `stren'
> util.o:/home/jimc/projects/perlcore/perl/util.c:4764: more undefined
> references to `stren' follow
> 
> this fixed it here:
> 
> [jimc@buffy perl]$ git diff
> diff --git a/util.c b/util.c
> index 53fa197b60..9d3f5ba0f1 100644
> --- a/util.c
> +++ b/util.c
> @@ -4761,7 +4761,7 @@ S_mem_log_common(enum mem_log_type mlt, const UV n,
>           * timeval. */
>          {
>              STRLEN len;
> -            const char* endptr = pmlenv + stren(pmlenv);
> +            const char* endptr = pmlenv + strlen(pmlenv);
>              int fd;
>               UV uv;
>               if (grok_atoUV(pmlenv, &uv, &endptr) /* Ignore endptr. */
> [jimc@buffy perl]$
> 

Thread Previous


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