Add LLVM19

RELEASE_NOTES.md

@@ -1,11 +1,12 @@
-# Version 2.7.0 (LLVM15-18) Pending
+# Version 2.7.0 (LLVM15-19) Pending
 
 ## Added
 * Package lock support, based on SBCL's. Currently ignores local
   bindings. Thanks @bumblingbats.
 * Add support for 80-bit and 128-bit LONG-FLOAT. Extended precision
-  LONG-FLOAT is available on amd64 and non-Apply arm64 platforms. It
+  LONG-FLOAT is available on amd64 and non-Apple arm64 platforms. It
   is automatically detected and enabled.
+* LLVM19 support.  
 
 ## Changed
 * Floating point exceptions FE_INVALID, FE_OVERFLOW and FE_DIVBYZERO

include/clasp/clbind/class.h

@@ -754,12 +754,6 @@ template <class T, class Base = no_bases, class WrappedType = reg::null_type> st
 
     return *this;
   }
-
-public:
-  template <class Getter, class Setter>
-  class_& def_property(const std::string& prefix, Getter g, Setter s, const char* docstring = "") {
-    this->property_impl(prefix, g, s);
-  }
 };
 } // namespace clbind
 

include/clasp/clbind/policies.h

@@ -130,13 +130,13 @@ template <class... PTypes> struct policies {
   bool m_auto_export = true;
   bool m_setf = false;
   void describe() {
-    printf("%s:%d Descibing Policy\n", __FILE__, __LINE__);
+    fmt::print("{}:{} Descibing Policy\n", __FILE__, __LINE__);
     if (this->m_lambda_list != "") {
-      printf("lambda_list = %s\n", this->m_lambda_list.c_str());
+      fmt::print("lambda_list = {}\n", this->m_lambda_list);
     } else {
-      printf("keyword_list = %s\n", this->keyword_list().c_str());
+      fmt::print("keyword_list = {}\n", this->keywordList());
     }
-    printf("Docstring = %s\n", this->m_doc_string.c_str());
+    fmt::print("Docstring = {}\n", this->m_doc_string.c_str());
   }
   std::string keywordList() const {
     if (this->m_keywords.size() == 0) {

include/clasp/gctools/exposeFunctions.h

@@ -90,7 +90,6 @@ class DerivableFrontendActionFactory;
 #undef DECLARE_FORWARDS
 #endif
 #endif
-namespace gctools {
 
 ////////////////////////////////////////////////////////////
 //
@@ -108,7 +107,6 @@ namespace gctools {
 #undef GC_STAMP_SELECTORS
 #endif
 #endif
-}; // namespace gctools
 
 extern "C" {
 bool valid_stamp(gctools::stamp_t kind);

include/clasp/gctools/gc_interface.h

@@ -94,8 +94,6 @@ class DerivableFrontendActionFactory;
 #endif
 #endif
 
-namespace gctools {
-
 ////////////////////////////////////////////////////////////
 //
 // Define the stamps
@@ -112,7 +110,6 @@ namespace gctools {
 #undef GC_STAMP_SELECTORS
 #endif
 #endif
-}; // namespace gctools
 
 extern "C" {
 bool valid_stamp(gctools::stamp_t kind);

include/clasp/gctools/gcalloc.h

@@ -839,7 +839,7 @@ template <class OT> class GC {
     size_t capacity = length + 1;
     size_t size = sizeof_container_with_header<OT>(capacity);
     if (static_container_p)
-      return GCObjectAllocator<OT>::template static_allocate_kind(
+      return GCObjectAllocator<OT>::static_allocate_kind(
           Header_s::BadgeStampWtagMtag::make_StampWtagMtag(OT::static_ValueStampWtagMtag), size, length,
           std::forward<ARGS>(args)...);
     else

include/clasp/gctools/memoryManagement.h

@@ -1030,15 +1030,15 @@ extern size_t global_sizeof_fwd;
 inline size_t Align(size_t size) { return ((AlignUp(size) >= global_sizeof_fwd) ? AlignUp(size) : global_sizeof_fwd); };
 
 // Manually define these for the sake of As<Fixnum_sp> etc.
-template <> struct gctools::GCStamp<core::Fixnum_I> {
+template <> struct GCStamp<core::Fixnum_I> {
 public:
   static GCStampEnum const StampWtag = STAMPWTAG_core__Fixnum_dummy_O;
 };
-template <> struct gctools::GCStamp<core::SingleFloat_I> {
+template <> struct GCStamp<core::SingleFloat_I> {
 public:
   static GCStampEnum const StampWtag = STAMPWTAG_core__SingleFloat_dummy_O;
 };
-template <> struct gctools::GCStamp<core::Character_I> {
+template <> struct GCStamp<core::Character_I> {
 public:
   static GCStampEnum const StampWtag = STAMPWTAG_core__Character_dummy_O;
 };