00001 // Copyright (C) 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_INTERNAL_RESOLVE_HH 00027 # define MLN_FUN_INTERNAL_RESOLVE_HH 00028 00032 00033 # include <mln/core/concept/function.hh> 00034 # include <mln/trait/solve.hh> 00035 # include <mln/value/builtin/all.hh> 00036 00037 00038 # define mln_fun_internal_resolve(F) typename fun::internal::resolve< F >::ret 00039 00040 00041 00042 namespace mln 00043 { 00044 00045 namespace fun 00046 { 00047 00048 namespace internal 00049 { 00050 00051 template <typename F> 00052 struct resolve; 00053 00054 template < template <class, class> class F, 00055 typename L, 00056 typename R > 00057 struct resolve< F<L,R> > : public mln::trait::solve_binary< F, L, R >, 00058 private mlc_is_a__1comma(F<L,R>, Function)::check_t 00059 { 00060 }; 00061 00062 template < template <class> class F, 00063 typename T > 00064 struct resolve< F<T> > : public mln::trait::solve_unary< F, T >, 00065 private mlc_is_a(F<T>, Function)::check_t 00066 { 00067 }; 00068 00069 } // end of namespace mln::fun::internal 00070 00071 } // end of namespace mln::fun 00072 00073 } // end of namespace mln 00074 00075 00076 #endif // ! MLN_FUN_INTERNAL_RESOLVE_HH
1.7.1