|
Rcpp Version 0.9.10
|
00001 // -*- mode: C++; c-indent-level: 4; c-basic-offset: 4; tab-width: 8 -*- 00002 /* :tabSize=4:indentSize=4:noTabs=false:folding=explicit:collapseFolds=1: */ 00003 // 00004 // wrap_type_traits.h: Rcpp R/C++ interface class library -- traits to help wrap 00005 // 00006 // Copyright (C) 2010 - 2011 Dirk Eddelbuettel and Romain Francois 00007 // 00008 // This file is part of Rcpp. 00009 // 00010 // Rcpp is free software: you can redistribute it and/or modify it 00011 // under the terms of the GNU General Public License as published by 00012 // the Free Software Foundation, either version 2 of the License, or 00013 // (at your option) any later version. 00014 // 00015 // Rcpp is distributed in the hope that it will be useful, but 00016 // WITHOUT ANY WARRANTY; without even the implied warranty of 00017 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00018 // GNU General Public License for more details. 00019 // 00020 // You should have received a copy of the GNU General Public License 00021 // along with Rcpp. If not, see <http://www.gnu.org/licenses/>. 00022 00023 #ifndef Rcpp__traits__wrap_type_traits__h 00024 #define Rcpp__traits__wrap_type_traits__h 00025 00026 namespace Rcpp{ 00027 namespace traits{ 00028 00032 struct wrap_type_primitive_tag{}; 00033 00037 struct wrap_type_unknown_tag{}; 00038 00048 template <typename T> struct wrap_type_traits { typedef wrap_type_unknown_tag wrap_category; } ; 00049 00053 template <> struct wrap_type_traits<int> { typedef wrap_type_primitive_tag wrap_category; } ; 00054 template <> struct wrap_type_traits<const int> { typedef wrap_type_primitive_tag wrap_category; } ; 00055 00056 template <> struct wrap_type_traits<double> { typedef wrap_type_primitive_tag wrap_category; } ; 00057 template <> struct wrap_type_traits<Rbyte> { typedef wrap_type_primitive_tag wrap_category; } ; 00058 template <> struct wrap_type_traits<Rcomplex> { typedef wrap_type_primitive_tag wrap_category; } ; 00059 template <> struct wrap_type_traits<unsigned int> { typedef wrap_type_primitive_tag wrap_category; } ; 00060 template <> struct wrap_type_traits<bool> { typedef wrap_type_primitive_tag wrap_category; } ; 00061 template <> struct wrap_type_traits<std::string> { typedef wrap_type_primitive_tag wrap_category; } ; 00062 template <> struct wrap_type_traits<char> { typedef wrap_type_primitive_tag wrap_category; } ; 00063 00064 template <> struct wrap_type_traits<float> { typedef wrap_type_primitive_tag wrap_category; } ; 00065 template <> struct wrap_type_traits< std::complex<float> > { typedef wrap_type_primitive_tag wrap_category; } ; 00066 template <> struct wrap_type_traits< std::complex<double> > { typedef wrap_type_primitive_tag wrap_category; } ; 00067 00068 template <> struct wrap_type_traits<long> { typedef wrap_type_primitive_tag wrap_category; } ; 00069 template <> struct wrap_type_traits<unsigned long> { typedef wrap_type_primitive_tag wrap_category; } ; 00070 00071 template <> struct wrap_type_traits<long double> { typedef wrap_type_primitive_tag wrap_category; } ; 00072 00073 template <> struct wrap_type_traits<short> { typedef wrap_type_primitive_tag wrap_category; } ; 00074 template <> struct wrap_type_traits<unsigned short> { typedef wrap_type_primitive_tag wrap_category; } ; 00075 00076 #ifdef RCPP_HAS_LONG_LONG_TYPES 00077 template <> struct wrap_type_traits<rcpp_long_long_type> { typedef wrap_type_primitive_tag wrap_category; } ; 00078 template <> struct wrap_type_traits<rcpp_ulong_long_type> { typedef wrap_type_primitive_tag wrap_category; } ; 00079 #endif 00080 00081 } // namespace traits 00082 } // namespace Rcpp 00083 #endif