Fix error macrocc

Author: yitzchak

include/clasp/gctools/hardErrors.h

@@ -27,6 +27,8 @@ THE SOFTWARE.
 */
 /* -^- */
 
+#include <fmt/format.h>
+
 void dbg_hook(const char* errorString);
 
 namespace core {

include/clasp/gctools/smart_pointers.h

@@ -133,7 +133,7 @@ template <class T> class base_ptr {
 
   template <class o_class> inline base_ptr<o_class> as_assert() const {
 #ifdef DEBUG_ASSERT
-    GCTOOLS_ASSERT(TaggedCast<o_class*, Type*>::isA(this->theObject))
+    GCTOOLS_ASSERT((TaggedCast<o_class*, Type*>::isA(this->theObject)))
 #endif
     base_ptr<o_class> ret((Tagged)this->theObject);
     return ret;
@@ -401,7 +401,7 @@ template <> class smart_ptr<core::T_O> {
 
   template <class o_class> inline smart_ptr<o_class> as_assert() const {
 #ifdef DEBUG_ASSERT
-    GCTOOLS_ASSERT(TaggedCast<o_class*, Type*>::isA(this->theObject))
+    GCTOOLS_ASSERT((TaggedCast<o_class*, Type*>::isA(this->theObject)))
 #endif
     smart_ptr<o_class> ret((Tagged)this->theObject);
     return ret;
@@ -686,7 +686,7 @@ template <> class smart_ptr<core::Cons_O> {
   }
   template <class o_class> inline smart_ptr<o_class> as_assert() const {
 #ifdef DEBUG_ASSERT
-    GCTOOLS_ASSERT(TaggedCast<o_class*, Type*>::isA(this->theObject))
+    GCTOOLS_ASSERT((TaggedCast<o_class*, Type*>::isA(this->theObject)))
 #endif
     smart_ptr<o_class> ret((Tagged)this->theObject);
     return ret;
@@ -817,7 +817,7 @@ template <> class smart_ptr<core::List_V> {
   }
   template <class o_class> inline smart_ptr<o_class> as_assert() const {
 #ifdef DEBUG_ASSERT
-    GCTOOLS_ASSERT(TaggedCast<o_class*, Type*>::isA(this->theObject))
+    GCTOOLS_ASSERT((TaggedCast<o_class*, Type*>::isA(this->theObject)))
 #endif
     smart_ptr<o_class> ret((Tagged)this->theObject);
     return ret;