Milena (Olena)  User documentation 2.0a Id
 All Classes Namespaces Functions Variables Typedefs Enumerator Groups Pages
scomp.hh
1 // Copyright (C) 2007, 2008, 2009 EPITA Research and Development Laboratory (LRDE)
2 //
3 // This file is part of Olena.
4 //
5 // Olena is free software: you can redistribute it and/or modify it under
6 // the terms of the GNU General Public License as published by the Free
7 // Software Foundation, version 2 of the License.
8 //
9 // Olena is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 // General Public License for more details.
13 //
14 // You should have received a copy of the GNU General Public License
15 // along with Olena. If not, see <http://www.gnu.org/licenses/>.
16 //
17 // As a special exception, you may use this file as part of a free
18 // software project without restriction. Specifically, if other files
19 // instantiate templates or use macros or inline functions from this
20 // file, or you compile this file and link it with other files to produce
21 // an executable, this file does not by itself cause the resulting
22 // executable to be covered by the GNU General Public License. This
23 // exception does not however invalidate any other reasons why the
24 // executable file might be covered by the GNU General Public License.
25 
26 #ifndef MLN_FUN_COMPONENT_SCOMP_HH
27 # define MLN_FUN_COMPONENT_SCOMP_HH
28 
33 
34 # include <mln/fun/unary.hh>
35 # include <mln/fun/component/comp.hh>
36 
37 namespace mln
38 {
39 
40  namespace fun
41  {
42 
43  template <unsigned ith>
44  struct scomp : unary< scomp<ith> >
45  {
46  };
47 
48  } // end of namespace mln::fun
49 
50 # ifndef MLN_INCLUDE_ONLY
51 
52  namespace trait
53  {
54 
55  namespace next
56  {
57 
58  template <unsigned ith, typename T>
59  struct set_unary_<fun::scomp<ith>, mln::Object, T>
60  {
61  typedef set_unary_ ret;
62  typedef mln_trait_nunary(fun::comp, T) comp_t;
63 
64  typedef T argument;
65  typedef mln_result(comp_t) result;
66  typedef mln_lvalue(comp_t) lvalue;
67 
68  static result read(const argument& v)
69  {
70  return comp_t::read(ith, v);
71  }
72 
73  static void write(lvalue l, const result& r)
74  {
75  comp_t::write(ith, l, r);
76  }
77  };
78 
79  } // end of namespace mln::trait::next
80 
81  } // end of namespace mln::trait
82 
83 # endif // ! MLN_INCLUDE_ONLY
84 
85 } // end of namespace mln
86 
87 #endif // ! MLN_FUN_COMPONENT_SCOMP_HH