Re: MPE Port and collect

[Mark Klein <mklein@dis.com>]

At 08:53 PM 11/8/99 -0700, Jeffrey A Law wrote:

>So instead collect builds and exports a single constructor function for the
>entire library.  *that* function should be added to he ctor/dtor list for
>the main program.

That appears not to be happening and I don't see anything in the source code
that looks as it would do what you describe.

Here's the pertinent output of collect with debugging enabled:

  /usr/local/hppa1.0-hp-mpeix/bin/nm -n a.out

nm output with constructors/destructors.
         00026fa4 T _GLOBAL_$I$tie__C3ios
         00026fc0 T _GLOBAL_$I$tie__C3ios
         00026ff4 T _GLOBAL_$D$tie__C3ios
         00027010 T _GLOBAL_$D$tie__C3ios

  /DIS/GNU/src/egcs-ss/obj-MPE/gcc/ldd a.out

ldd output with constructors/destructors.
         a.out
           /tmp/blah1.sl
           /SYS/HPDCE/DCEXL
           /SYS/THREADS/OTHDXL

  /usr/local/hppa1.0-hp-mpeix/bin/nm -n a.out

nm output with constructors/destructors.
         00026fa4 T _GLOBAL_$I$tie__C3ios
         00026fc0 T _GLOBAL_$I$tie__C3ios
         00026ff4 T _GLOBAL_$D$tie__C3ios
         00027010 T _GLOBAL_$D$tie__C3ios

  /usr/local/hppa1.0-hp-mpeix/bin/nm -n /tmp/blah1.sl

nm output with constructors/destructors.
         0012b1bc T _GLOBAL_$I$__3foo
         0012b1d8 T _GLOBAL_$I$__3foo

  /usr/local/hppa1.0-hp-mpeix/bin/nm -n /SYS/HPDCE/DCEXL

nm output with constructors/destructors.

  /usr/local/hppa1.0-hp-mpeix/bin/nm -n /SYS/THREADS/OTHDXL

nm output with constructors/destructors.

1 constructor(s) found
1 destructor(s)  found
0 frame table(s) found
[Leaving a.out]

Note that it sees the constructor for foo in the shared library
blah1.sl. But, I don't see any function constructed below that
references the shared library blah1.sl:

========== output_file = a.out, c_file = /usr/tmp/cc9sFExG.c
#ifdef __cplusplus
extern "C" {
#endif
typedef void entry_pt();

extern entry_pt x7 __asm__ ("_GLOBAL_$I$tie__C3ios");

entry_pt * __CTOR_LIST__[] = {
         (entry_pt *) 1,
         x7,
         0
};

extern entry_pt x8 __asm__ ("_GLOBAL_$D$tie__C3ios");

entry_pt * __DTOR_LIST__[] = {
         (entry_pt *) 1,
         x8,
         0
};

extern entry_pt __main;
entry_pt *__main_reference = __main;

#ifdef __cplusplus
}
#endif
========== end of c_file

I also don't see in the source code how that is supposed to work when
the symbols from that library never get added to a list for later
processing.

I also see that collect does have quite a bit of machine specific
code. Since MPE is late binding, simply conditionalizing:

         if (which_pass != PASS_LIB)

in scan_prog_file() I believe will solve my issue. But, is there a
better way to do this?

TIA,


M.
--
Mark Klein                                 DIS International, Ltd.
http://www.dis.com                         415-892-8400
PGP Public Key Available