00001 // This file is a part of Aurelia. 00002 // Copyright (C) 2010 Valentin David 00003 // Copyright (C) 2010 University of Bergen 00004 // 00005 // This program is free software: you can redistribute it and/or modify 00006 // it under the terms of the GNU General Public License as published by 00007 // the Free Software Foundation, either version 3 of the License, or 00008 // (at your option) any later version. 00009 // 00010 // This program 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 00013 // GNU General Public License for more details. 00014 // 00015 // You should have received a copy of the GNU General Public License 00016 // along with this program. If not, see <http://www.gnu.org/licenses/>. 00017 #ifndef __ALLTD_HH 00018 # define __ALLTD_HH 00019 00020 # include "all.hh" 00021 # include "../strategies.hh" 00022 00023 namespace aurelia { 00024 00027 template <typename S> 00028 struct alltd_strategy { 00029 private: S s; 00030 public: alltd_strategy(const S& s): s(s) {} 00031 template <typename T> 00032 T operator()(const T& term) const { 00033 typedef typename strategy_concept<typename strategy_model<S, T>::model> 00034 ::check require; 00035 00036 return (s + all(*this))(term); 00037 } 00038 }; 00039 00043 template <typename S> 00044 alltd_strategy<S> alltd(const S& s) { 00045 return alltd_strategy<S>(s); 00046 } 00047 00048 } 00049 00050 #endif