From ac23228bd6e65b92b483e84c36f479e4aa08549c Mon Sep 17 00:00:00 2001 From: Richard Kreckel Date: Tue, 12 Jun 2001 22:51:39 +0000 Subject: [PATCH] - Fix GCC 2.95.x brokenness. --- ginac/basic.cpp | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/ginac/basic.cpp b/ginac/basic.cpp index eb2c85df..92bd1605 100644 --- 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 -- 2.44.0