- added find() (like has(), but returns list of all occurrences)

[ginac.git] / ginac / wildcard.h

diff --git a/ginac/wildcard.h b/ginac/wildcard.h
index 2e76e193d3ee4b83f4efe4e8c08744741f8d7bfc..f787bcbacaa86149a21371d8c71f3badafd19f81 100644 (file)
--- a/ginac/wildcard.h
+++ b/ginac/wildcard.h
@@ -28,8 +28,8 @@
 namespace GiNaC {
 
 
-/** This class acts as a wildcard for subs(), match() and has(). An integer
- *  label is used to identify different wildcards. */
+/** This class acts as a wildcard for subs(), match(), has() and find(). An
+ *  integer label is used to identify different wildcards. */
 class wildcard : public basic
 {
        GINAC_DECLARE_REGISTERED_CLASS(wildcard, basic)
@@ -39,12 +39,14 @@ public:
        /** Construct wildcard with specified label. */
        wildcard(unsigned label);
 
-       // functions overriding virtual functions from bases classes
+       // functions overriding virtual functions from base classes
 public:
        void print(const print_context & c, unsigned level = 0) const;
-       unsigned calchash(void) const;
        bool match(const ex & pattern, lst & repl_lst) const;
 
+protected:
+       unsigned calchash(void) const;
+
        // non-virtual functions in this class
 public:
        unsigned get_label(void) const {return label;}
@@ -55,12 +57,21 @@ private:
 };
 
 
-// global functions
+// utility functions
+
+/** Return the wildcard object handled by an ex.  Deprecated: use ex_to<wildcard>().
+ *  This is unsafe: you need to check the type first. */
 inline const wildcard &ex_to_wildcard(const ex &e)
 {
        return static_cast<const wildcard &>(*e.bp);
 }
 
+/** Specialization of is_exactly_a<wildcard>(obj) for wildcard objects. */
+template<> inline bool is_exactly_a<wildcard>(const basic & obj)
+{
+        return obj.tinfo()==TINFO_wildcard;
+}
+
 /** Create a wildcard object with the specified label. */
 inline ex wild(unsigned label = 0)
 {