Cosmetic stray semi-colon removal after %typemap using quotes
This commit is contained in:
parent
ec965840ce
commit
c10a84c775
59 changed files with 258 additions and 256 deletions
|
|
@ -53,7 +53,7 @@ SWIG_InitializeModule(0);
|
|||
assert(all(sapply($input, class) == "$R_class"));
|
||||
%}
|
||||
|
||||
%typemap(out) void "";
|
||||
%typemap(out) void ""
|
||||
|
||||
%typemap(in) int *, int[ANY],
|
||||
signed int *, signed int[ANY],
|
||||
|
|
|
|||
|
|
@ -3,26 +3,26 @@
|
|||
for use in class representations.
|
||||
*/
|
||||
|
||||
%typemap("rtype") int, int *, int & "integer";
|
||||
%typemap("rtype") long, long *, long & "integer";
|
||||
%typemap("rtype") float, float*, float & "numeric";
|
||||
%typemap("rtype") double, double*, double & "numeric";
|
||||
%typemap("rtype") char *, char ** "character";
|
||||
%typemap("rtype") char "character";
|
||||
%typemap("rtype") string, string *, string & "character";
|
||||
%typemap("rtype") std::string, std::string *, std::string & "character";
|
||||
%typemap("rtype") bool, bool * "logical";
|
||||
%typemap("rtype") enum SWIGTYPE "character";
|
||||
%typemap("rtype") enum SWIGTYPE * "character";
|
||||
%typemap("rtype") enum SWIGTYPE *const "character";
|
||||
%typemap("rtype") enum SWIGTYPE & "character";
|
||||
%typemap("rtype") const enum SWIGTYPE & "character";
|
||||
%typemap("rtype") enum SWIGTYPE && "character";
|
||||
%typemap("rtype") SWIGTYPE * "$R_class";
|
||||
%typemap("rtype") SWIGTYPE *const "$R_class";
|
||||
%typemap("rtype") SWIGTYPE & "$R_class";
|
||||
%typemap("rtype") SWIGTYPE && "$R_class";
|
||||
%typemap("rtype") SWIGTYPE "$&R_class";
|
||||
%typemap("rtype") int, int *, int & "integer"
|
||||
%typemap("rtype") long, long *, long & "integer"
|
||||
%typemap("rtype") float, float*, float & "numeric"
|
||||
%typemap("rtype") double, double*, double & "numeric"
|
||||
%typemap("rtype") char *, char ** "character"
|
||||
%typemap("rtype") char "character"
|
||||
%typemap("rtype") string, string *, string & "character"
|
||||
%typemap("rtype") std::string, std::string *, std::string & "character"
|
||||
%typemap("rtype") bool, bool * "logical"
|
||||
%typemap("rtype") enum SWIGTYPE "character"
|
||||
%typemap("rtype") enum SWIGTYPE * "character"
|
||||
%typemap("rtype") enum SWIGTYPE *const "character"
|
||||
%typemap("rtype") enum SWIGTYPE & "character"
|
||||
%typemap("rtype") const enum SWIGTYPE & "character"
|
||||
%typemap("rtype") enum SWIGTYPE && "character"
|
||||
%typemap("rtype") SWIGTYPE * "$R_class"
|
||||
%typemap("rtype") SWIGTYPE *const "$R_class"
|
||||
%typemap("rtype") SWIGTYPE & "$R_class"
|
||||
%typemap("rtype") SWIGTYPE && "$R_class"
|
||||
%typemap("rtype") SWIGTYPE "$&R_class"
|
||||
|
||||
%typemap("rtypecheck") int, int &, long, long &
|
||||
%{ (is.integer($arg) || is.numeric($arg)) && length($arg) == 1 %}
|
||||
|
|
|
|||
|
|
@ -841,7 +841,7 @@
|
|||
%typemap("rtypecheck") std::vector<double>, std::vector<double> *, std::vector<double> &
|
||||
%{ is.numeric($arg) %}
|
||||
%typemap("rtype") std::vector<double> "numeric"
|
||||
%typemap("scoercein") std::vector<double>, std::vector<double> *, std::vector<double> & "$input = as.numeric($input);";
|
||||
%typemap("scoercein") std::vector<double>, std::vector<double> *, std::vector<double> & "$input = as.numeric($input);"
|
||||
|
||||
%typemap_traits_ptr(SWIG_TYPECHECK_VECTOR, std::vector<float>)
|
||||
%traits_type_name(std::vector<float>)
|
||||
|
|
@ -857,7 +857,7 @@
|
|||
%typemap("rtypecheck") std::vector<bool>, std::vector<bool> *, std::vector<bool> &
|
||||
%{ is.logical($arg) %}
|
||||
%typemap("rtype") std::vector<bool> "logical"
|
||||
%typemap("scoercein") std::vector<bool> , std::vector<bool> & "$input = as.logical($input);";
|
||||
%typemap("scoercein") std::vector<bool> , std::vector<bool> & "$input = as.logical($input);"
|
||||
|
||||
|
||||
%typemap_traits_ptr(SWIG_TYPECHECK_VECTOR, std::vector<int>);
|
||||
|
|
@ -866,7 +866,7 @@
|
|||
%{ is.integer($arg) || is.numeric($arg) %}
|
||||
|
||||
%typemap("rtype") std::vector<int> "integer"
|
||||
%typemap("scoercein") std::vector<int> , std::vector<int> *, std::vector<int> & "$input = as.integer($input);";
|
||||
%typemap("scoercein") std::vector<int> , std::vector<int> *, std::vector<int> & "$input = as.integer($input);"
|
||||
|
||||
// strings
|
||||
%typemap("rtype") std::vector< std::basic_string<char> >,
|
||||
|
|
@ -974,21 +974,21 @@ std::vector< std::basic_string<char> > *,
|
|||
%typemap("rtypecheck") std::vector<std::vector<int> >, std::vector<std::vector<int> > *, std::vector<std::vector<int> > &
|
||||
%{ is.list($arg) && all(sapply($arg , is.integer) || sapply($arg, is.numeric)) %}
|
||||
%typemap("rtype") std::vector<std::vector<int> >, std::vector<std::vector<int> > *, std::vector<std::vector<int> > & "list"
|
||||
%typemap("scoercein") std::vector< std::vector<int> >, std::vector<std::vector<int> > *, std::vector<std::vector<int> > & "$input = lapply($input, as.integer);";
|
||||
%typemap("scoercein") std::vector< std::vector<int> >, std::vector<std::vector<int> > *, std::vector<std::vector<int> > & "$input = lapply($input, as.integer);"
|
||||
|
||||
%typemap_traits_ptr(SWIG_TYPECHECK_VECTOR, std::vector<std::vector<unsigned int> >);
|
||||
%traits_type_name(std::vector< std::vector<unsigned int> >);
|
||||
%typemap("rtypecheck") std::vector<std::vector<unsigned int> >, std::vector<std::vector<unsigned int> > *, std::vector<std::vector<unsigned int> > &
|
||||
%{ is.list($arg) && all(sapply($arg , is.integer) || sapply($arg, is.numeric)) %}
|
||||
%typemap("rtype") std::vector<std::vector<unsigned int> >, std::vector<std::vector<unsigned int> > *, std::vector<std::vector<unsigned int> > & "list"
|
||||
%typemap("scoercein") std::vector< std::vector<unsigned int> >, std::vector<std::vector<int> > *, std::vector<std::vector<unsigned int> > & "$input = lapply($input, as.integer);";
|
||||
%typemap("scoercein") std::vector< std::vector<unsigned int> >, std::vector<std::vector<int> > *, std::vector<std::vector<unsigned int> > & "$input = lapply($input, as.integer);"
|
||||
|
||||
%typemap_traits_ptr(SWIG_TYPECHECK_VECTOR, std::vector<std::vector<float> >);
|
||||
%traits_type_name(std::vector< std::vector<float> >);
|
||||
%typemap("rtypecheck") std::vector<std::vector<float> >, std::vector<std::vector<float> > *, std::vector<std::vector<float> > &
|
||||
%{ is.list($arg) && all(sapply($arg , is.integer) || sapply($arg, is.numeric)) %}
|
||||
%typemap("rtype") std::vector<std::vector<float> >, std::vector<std::vector<float> > *, std::vector<std::vector<float> > "list"
|
||||
%typemap("scoercein") std::vector< std::vector<float> >, std::vector<std::vector<float> > *, std::vector<std::vector<float> > & "$input = lapply($input, as.numeric);";
|
||||
%typemap("scoercein") std::vector< std::vector<float> >, std::vector<std::vector<float> > *, std::vector<std::vector<float> > & "$input = lapply($input, as.numeric);"
|
||||
|
||||
%typemap_traits_ptr(SWIG_TYPECHECK_VECTOR, std::vector<std::vector<double> >);
|
||||
%traits_type_name(std::vector< std::vector<double> >);
|
||||
|
|
@ -1003,7 +1003,7 @@ std::vector< std::basic_string<char> > *,
|
|||
%typemap("rtypecheck") std::vector<std::vector<bool> >, std::vector<std::vector<bool> > *, std::vector<std::vector<bool> > &
|
||||
%{ is.list($arg) && all(sapply($arg , is.integer) || sapply($arg, is.numeric)) %}
|
||||
%typemap("rtype") std::vector<std::vector<bool> >, std::vector<std::vector<bool> > *, std::vector<std::vector<bool> > & "list"
|
||||
%typemap("scoercein") std::vector< std::vector<bool> >, std::vector<std::vector<bool> > *, std::vector<std::vector<bool> > & "$input = lapply($input, as.logical);";
|
||||
%typemap("scoercein") std::vector< std::vector<bool> >, std::vector<std::vector<bool> > *, std::vector<std::vector<bool> > & "$input = lapply($input, as.logical);"
|
||||
|
||||
// we don't want these to be given R classes as they
|
||||
// have already been turned into R vectors.
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue