Issue 23061 を倒したい

void main(string[] args)
{
	try
	{
		throw new Exception("aaa");
	}
	catch(Exception e)
	{
	}
}

$ docker run --rm -it -v $PWD:/workdir -w /workdir alpine:3.15 sh
# apk --no-cache add dmd gcc musl-dev llvm-libunwind-static
# dmd -c app.d
# gcc -static app.o -o app -lphobos2 -lunwind
# ldd app
/lib/ld-musl-x86_64.so.1: app: Not a valid dynamic program
# ./app
src/rt/dwarfeh.d:330: uncaught exception reached top of stack
This might happen if you're missing a top level catch in your fiber or signal handler
object.Exception@app.d(11): aaa
----------------
??:? <ERROR: Unable to retrieve function name> [0x0]
Aborted

    auto r = _Unwind_RaiseException(&eh.exception_object);

    /* Shouldn't have returned, but if it did:
     */
    switch (r)
    {
        case _URC_END_OF_STACK:
            ...
            fprintf(stderr, "%s:%d: uncaught exception reached top of stack\n", __FILE__.ptr, __LINE__);
            fprintf(stderr, "This might happen if you're missing a top level catch in your fiber or signal handler\n");
            ...
    }

...
else version (X86_Any)
{
    align(16) struct _Unwind_Exception
    {
        _Unwind_Exception_Class exception_class;
        _Unwind_Exception_Cleanup_Fn exception_cleanup;
        _Unwind_Word private_1;
        _Unwind_Word private_2;
    }
}
...

struct _Unwind_Context;

_Unwind_Reason_Code _Unwind_RaiseException(_Unwind_Exception *exception_object);

struct _Unwind_Exception
  {
    alignas(8) uint64_t exception_class;
    _Unwind_Exception_Cleanup_Fn exception_cleanup;
    unsigned long private_1;
    unsigned long private_2;
  };

struct _Unwind_Exception {
  uint64_t exception_class;
  void (*exception_cleanup)(_Unwind_Reason_Code reason,
                            _Unwind_Exception *exc);
#if defined(__SEH__) && !defined(__USING_SJLJ_EXCEPTIONS__)
  uintptr_t private_[6];
#else
  uintptr_t private_1; // non-zero means forced unwind
  uintptr_t private_2; // holds sp that phase1 found for phase2 to use
#endif
#if __SIZEOF_POINTER__ == 4
  // The implementation of _Unwind_Exception uses an attribute mode on the
  // above fields which has the side effect of causing this whole struct to
  // round up to 32 bytes in size (48 with SEH). To be more explicit, we add
  // pad fields added for binary compatibility.
  uint32_t reserved[3];
#endif
  // The Itanium ABI requires that _Unwind_Exception objects are "double-word
  // aligned".  GCC has interpreted this to mean "use the maximum useful
  // alignment for the target"; so do we.
} __attribute__((__aligned__));

-        case Musl:        return predef("CRuntime_Musl");
+        case Musl:        return predef("CRuntime_Musl"), predef("DRuntime_Use_Libunwind");

$ ./dmd/generated/linux/release/64/dmd -c sample.d || exit 1
$ cc sample.o -o sample -m64 -static -Xlinker --export-dynamic -L./dmd/generated/linux/release/64/../../../../../phobos/generated/linux/release/64 -Xlinker -Bstatic -lphobos2 -lpthread -lm -lrt -ldl || exit 1
$ ./sample
$ echo $?
0

$ ./dmd/generated/linux/release/64/dmd -c sample.d || exit 1
$ cc sample.o -o sample -m64 -static -Xlinker --export-dynamic -L./dmd/generated/linux/release/64/../../../../../phobos/generated/linux/release/64 -Xlinker -Bstatic -lphobos2 -lpthread -lm -lrt -ldl -lunwind || exit 1
$ ./sample
src/rt/dwarfeh.d:330: uncaught exception reached top of stack
This might happen if you're missing a top level catch in your fiber or signal handler
object.Exception@sample.d(9): aa
Aborted
$ echo $?
134

$ ldc2 -c sample.d
$ /usr/bin/cc sample.o -static -o sample -fuse-ld=bfd -Xlinker --export-dynamic -L/usr/lib -lphobos2-ldc -ldruntime-ldc -Wl,--gc-sections -lrt -ldl -lpthread -lm -m64
/usr/lib/gcc/x86_64-alpine-linux-musl/11.2.1/../../../../x86_64-alpine-linux-musl/bin/ld.bfd: /usr/lib/libdruntime-ldc.a(handler.o): in function `_D4core8internal9backtrace7handler16LibunwindHandler6__ctorMFNbNimZCQCoQCmQCgQBzQBu':
handler.d:(.text._D4core8internal9backtrace7handler16LibunwindHandler6__ctorMFNbNimZCQCoQCmQCgQBzQBu+0x78): undefined reference to `unw_getcontext'
/usr/lib/gcc/x86_64-alpine-linux-musl/11.2.1/../../../../x86_64-alpine-linux-musl/bin/ld.bfd: handler.d:(.text._D4core8internal9backtrace7handler16LibunwindHandler6__ctorMFNbNimZCQCoQCmQCgQBzQBu+0x83): undefined reference to `unw_init_local'
/usr/lib/gcc/x86_64-alpine-linux-musl/11.2.1/../../../../x86_64-alpine-linux-musl/bin/ld.bfd: handler.d:(.text._D4core8internal9backtrace7handler16LibunwindHandler6__ctorMFNbNimZCQCoQCmQCgQBzQBu+0xa4): undefined reference to `unw_step'
/usr/lib/gcc/x86_64-alpine-linux-musl/11.2.1/../../../../x86_64-alpine-linux-musl/bin/ld.bfd: handler.d:(.text._D4core8internal9backtrace7handler16LibunwindHandler6__ctorMFNbNimZCQCoQCmQCgQBzQBu+0xd7): undefined reference to `unw_get_proc_info'
/usr/lib/gcc/x86_64-alpine-linux-musl/11.2.1/../../../../x86_64-alpine-linux-musl/bin/ld.bfd: handler.d:(.text._D4core8internal9backtrace7handler16LibunwindHandler6__ctorMFNbNimZCQCoQCmQCgQBzQBu+0xf4): undefined reference to `unw_step'
collect2: error: ld returned 1 exit status

$ ldc2 -c sample.d
$ /usr/bin/cc sample.o -static -o sample -fuse-ld=bfd -Xlinker --export-dynamic -L/usr/lib -lphobos2-ldc -ldruntime-ldc -Wl,--gc-sections -lunwind -lrt -ldl -lpthread -lm -m64
$ ./sample
rt/dwarfeh.d:354: uncaught exception reached top of stack
This might happen if you're missing a top level catch in your fiber or signal handler
object.Exception@sample.d(9): aa
----------------
<unknown dir>/<unknown file>:10 <ERROR: Unable to retrieve function name> [0x0]
Aborted
$ echo $?
134

$ dmd -c app.d
$ gcc app.o -o app -m64 -static -Xlinker --eh-frame-hdr -Xlinker --export-dynamic -L/usr/lib/ -Xlinker -Bstatic -lphobos2 -lpthread -lm -lrt -ldl -lunwind
$ ./app
$ echo $?
0

$ CC=gcc ldc2 -L--eh-frame-hdr -static -run app.d
$ echo $?
0

$ dmd -c app.d
$ clang app.o -o app -m64 -static -Xlinker --export-dynamic -L/usr/lib/ -Xlinker -Bstatic -lphobos2 -lpthread -lm -lrt -ldl -lunwind
$ ./app
$ echo $?
0

$ CC=clang ldc2 -static -run app.d
$ echo $?
0