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