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

Re: Threaded bleads broken on HP-UX 11.31 by commit 7258295b51ee7

Thread Previous | Thread Next
From:
H.Merijn Brand
Date:
August 4, 2018 13:51
Subject:
Re: Threaded bleads broken on HP-UX 11.31 by commit 7258295b51ee7
Message ID:
20180804155106.22b02711@pc09.procura.nl
On Thu, 2 Aug 2018 16:16:36 +0200, "H.Merijn Brand"
<h.m.brand@xs4all.nl> wrote:

> cc -L/pro/local/lib +DD64 -L/usr/lib/hpux64 -o miniperl \
>             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  -lcl -lpthread -lnsl -ldl -lm -lsec -lc
> cc: warning 983: The -lc library specified on the command line is also added automatically by the compiler driver.
> ld: Unsatisfied symbol "PL_utf8_mark" in file utf8.o
> ld: Unsatisfied symbol "PL_InBitmap" in file regcomp.o

$ make regcomp.i
cc -c -DPERL_CORE -D_POSIX_C_SOURCE=199506L -D_REENTRANT -Ae +Z -z -D_HPUX_SOURCE -Wl,+vnocompatwarnings +DD64 -I/pro/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 +O2 +Onolimit -E regcomp.c > regcomp.i
$ grep -w -e PL_utf8_mark -e PL_InBitmap regcomp.i
extern SV * PL_utf8_mark;
extern SV * PL_InBitmap;
        Perl__invlist_union_maybe_complement_2nd(my_perl, invlist,PL_InBitmap,(1),&invlist);
    if (! PL_InBitmap) {
        PL_InBitmap = Perl__new_invlist(my_perl, 2);
        PL_InBitmap = Perl__add_range_to_invlist(my_perl, PL_InBitmap,0,(1 << 8) - 1);
            Perl__invlist_intersection_maybe_complement_2nd(my_perl, *invlist_ptr,PL_InBitmap,(1),invlist_ptr);
            Perl__invlist_intersection_maybe_complement_2nd(my_perl, *invlist_ptr,PL_InBitmap,(0),invlist_ptr);
    PL_utf8_mark = Perl__new_invlist_C_array(my_perl, uni_prop_ptrs[UNI_M]);
$ nm *.o|grep utf8_mark
[341]    |                     0|       0|FUNC |GLOB |0|   UNDEF|Perl__is_utf8_mark
[546]    |                     0|      80|FUNC |GLOB |0|   .text|Perl_is_utf8_mark
[361]    |                     0|       0|FUNC |GLOB |0|   UNDEF|Perl__is_utf8_mark
[539]    |                     0|       0|OBJT |GLOB |0|   UNDEF|PL_utf8_mark
[286]    |                     0|       0|OBJT |GLOB |0|   UNDEF|PL_utf8_mark
[250]    |                     0|    1552|FUNC |GLOB |0|   .text|Perl__is_utf8_mark

Which is the file that is expected to define it?

Or are those "extern SV * PL_..." expected to be #defines into a
structure? Then why didn't they fire?

-- 
H.Merijn Brand  http://tux.nl   Perl Monger  http://amsterdam.pm.org/
using perl5.00307 .. 5.29   porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/        http://www.test-smoke.org/
http://qa.perl.org   http://www.goldmark.org/jeff/stupid-disclaimers/

Thread Previous | Thread Next


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