00001 // Copyright (C) 2007, 2008, 2009 EPITA Research and Development Laboratory (LRDE) 00002 // 00003 // This file is part of Olena. 00004 // 00005 // Olena is free software: you can redistribute it and/or modify it under 00006 // the terms of the GNU General Public License as published by the Free 00007 // Software Foundation, version 2 of the License. 00008 // 00009 // Olena is distributed in the hope that it will be useful, 00010 // but WITHOUT ANY WARRANTY; without even the implied warranty of 00011 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00012 // General Public License for more details. 00013 // 00014 // You should have received a copy of the GNU General Public License 00015 // along with Olena. If not, see <http://www.gnu.org/licenses/>. 00016 // 00017 // As a special exception, you may use this file as part of a free 00018 // software project without restriction. Specifically, if other files 00019 // instantiate templates or use macros or inline functions from this 00020 // file, or you compile this file and link it with other files to produce 00021 // an executable, this file does not by itself cause the resulting 00022 // executable to be covered by the GNU General Public License. This 00023 // exception does not however invalidate any other reasons why the 00024 // executable file might be covered by the GNU General Public License. 00025 00026 #ifndef MLN_FUN_FROM_ACCU_HH 00027 # define MLN_FUN_FROM_ACCU_HH 00028 00029 # include <mln/fun/unary_param.hh> 00030 # include <mln/core/concept/accumulator.hh> 00031 00032 namespace mln 00033 { 00034 00035 // from_accu: wrap an accumulator into a function 00036 namespace fun 00037 { 00038 00039 template <typename A> 00040 struct from_accu : unary_param<from_accu<A>, A*> 00041 { 00042 from_accu() : unary_param<from_accu<A>, A*>() {}; 00043 from_accu(A* a) : unary_param<from_accu<A>, A*>(a) {}; 00044 }; 00045 00046 } // end of namespace mln::fun 00047 00048 namespace trait 00049 { 00050 00051 namespace next 00052 { 00053 template <typename A, typename T> 00054 struct set_unary_<mln::fun::from_accu<A>, mln::Object, T> 00055 { 00056 typedef set_unary_ ret; 00057 typedef typename A::result result; 00058 typedef typename A::argument argument; 00059 typedef A* param_t; 00060 00061 static inline 00062 result read(const param_t& accu_, const argument& x) 00063 { 00064 mln_precondition(accu_ != 0); 00065 00066 accu_->take(x); 00067 return accu_->to_result (); 00068 } 00069 }; 00070 00071 } // end of namespace mln::trait::next 00072 00073 } // end of namespace mln::trait 00074 00075 } // end of namespace mln 00076 00077 #endif /* ! MLN_FUN_FROM_ACCU_HH */