- Fix GCC 2.95.x brokenness.

[ginac.git] / ginac / basic.cpp

diff --git a/ginac/basic.cpp b/ginac/basic.cpp
index eb2c85dfb5989d1d439e8840cf9046a1d4ebe90b..92bd16053d8e921d35b3b26ee323545bd100e7ae 100644 (file)
--- a/ginac/basic.cpp
+++ b/ginac/basic.cpp
@@ -363,17 +363,17 @@ ex basic::evalf(int level) const
        return *this;
 }
 
+/** Function object to be applied by basic::evalm(). */
+struct evalm_map_function : public map_function {
+       ex operator()(const ex & e) { return GiNaC::evalm(e); }
+} fcn;
 /** Evaluate sums, products and integer powers of matrices. */
 ex basic::evalm(void) const
 {
        if (nops() == 0)
                return *this;
-       else {
-               struct evalm_map_function : public map_function {
-                       ex operator()(const ex & e) { return GiNaC::evalm(e); }
-               } fcn;
+       else
                return map(fcn);
-       }
 }
 
 /** Perform automatic symbolic evaluations on indexed expression that