- power::eval(): for the case (b_n/b_d)^(e_n/e_d) we now check separately

[ginac.git] / ginac / print.h

diff --git a/ginac/print.h b/ginac/print.h
index c8bd9b669c4207246ce2f661e6dc5ccde2875d4b..e32238d0fb3b631cb220be776a6c6aefc63fab6c 100644 (file)
--- a/ginac/print.h
+++ b/ginac/print.h
@@ -88,6 +88,11 @@ public:
          : print_csrc(os) {}
 };
 
+/** Check if obj is a T, including base classes. */
+template <class T>
+inline bool is_a(const print_context & obj)
+{ return dynamic_cast<const T *>(&obj)!=0; }
+
 } // namespace GiNaC
 
 #endif // ndef __GINAC_BASIC_H__