Add custom __MUSL__ flag to detect musl based distributions

Author: lostie

src/api.cpp

@@ -34,26 +34,21 @@ using namespace Rcpp;
 #endif
 
 #if defined(__GNUC__)
-    #if defined(_WIN32) || defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__CYGWIN__) || defined(__sun) || defined(_AIX)
+    #if defined(_WIN32) || defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__CYGWIN__) || defined(__sun) || defined(_AIX) || defined(__MUSL__)
         // do nothing
     #else
-        #ifndef __GLIBC__
-          // do nothing
-        #else
-          #include <execinfo.h>
-
-          static std::string demangler_one(const char* input) {
-              static std::string buffer;
-              buffer = input;
-              buffer.resize(buffer.find_last_of('+') - 1);
-              buffer.erase(
-                  buffer.begin(),
-                  buffer.begin() + buffer.find_last_of(' ') + 1
-              );
-              return demangle(buffer);
-          }
-        #endif
-
+        #include <execinfo.h>
+
+        static std::string demangler_one(const char* input) {
+            static std::string buffer;
+            buffer = input;
+            buffer.resize(buffer.find_last_of('+') - 1);
+            buffer.erase(
+                buffer.begin(),
+                buffer.begin() + buffer.find_last_of(' ') + 1
+            );
+            return demangle(buffer);
+        }
     #endif
 #endif
 
@@ -261,7 +256,7 @@ SEXP rcpp_can_use_cxx11() {
 // [[Rcpp::register]]
 SEXP stack_trace(const char* file, int line) {
     #if defined(__GNUC__)
-        #if defined(_WIN32) || defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__CYGWIN__) || defined(__sun) || defined(_AIX)
+        #if defined(_WIN32) || defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__CYGWIN__) || defined(__sun) || defined(_AIX) || defined(__MUSL__)
             // Simpler version for Windows and *BSD
             List trace = List::create(_["file"] = file,
                                       _[ "line"  ] = line,