view release on metacpan or  search on metacpan

src/subversion/subversion/bindings/swig/include/svn_global.swg  view on Meta::CPAN

   very different argument numbers than the wrapper Python function.

   SWIG doesn't provide any good way of getting Python argument
   numbers, so we extract the argument number using macros. This
   isn't a perfect solution, but it does the job. */
#define $svn_argnum svn_argnum_$input

/* We assume here that Subversion functions have no more than
   40 fixed parameters. If you want to wrap a function that has
   more fixed parameters, you'll need to add more #define
   statements. */
%{
#define svn_argnum_obj0 1
#define svn_argnum_obj1 2
#define svn_argnum_obj2 3
#define svn_argnum_obj3 4
#define svn_argnum_obj4 5
#define svn_argnum_obj5 6
#define svn_argnum_obj6 7
#define svn_argnum_obj7 8
#define svn_argnum_obj8 9
#define svn_argnum_obj9 10
#define svn_argnum_obj10 11
#define svn_argnum_obj11 12
#define svn_argnum_obj12 13
#define svn_argnum_obj13 14
#define svn_argnum_obj14 15
#define svn_argnum_obj15 16
#define svn_argnum_obj16 17
#define svn_argnum_obj17 18
#define svn_argnum_obj18 19
#define svn_argnum_obj19 20
#define svn_argnum_obj20 21
#define svn_argnum_obj21 22
#define svn_argnum_obj22 23
#define svn_argnum_obj23 24
#define svn_argnum_obj24 25
#define svn_argnum_obj25 26
#define svn_argnum_obj26 27
#define svn_argnum_obj27 28
#define svn_argnum_obj28 29
#define svn_argnum_obj29 30
#define svn_argnum_obj30 31
#define svn_argnum_obj31 32
#define svn_argnum_obj32 33
#define svn_argnum_obj33 34
#define svn_argnum_obj34 35
#define svn_argnum_obj35 36
#define svn_argnum_obj36 37
#define svn_argnum_obj37 38
#define svn_argnum_obj38 39
#define svn_argnum_obj39 40
%}

/* Python format specifiers. Use Python instead of SWIG to parse
   these basic types, because Python reports better error messages
   (with correct argument numbers). */
%typemap (in, parse="s")
  char *, char const *, char * const, char const * const "";
%typemap (in, parse="c") char "";
%typemap (in, fragment=SWIG_As_frag(long)) long
{
  $1 = ($1_ltype)SWIG_As(long)($input);
  if (SWIG_arg_fail($svn_argnum)) {
    SWIG_fail;
  }
}
%typemap (in, fragment=SWIG_As_frag(unsigned long)) unsigned long
{
  $1 = ($1_ltype)SWIG_As(unsigned long)($input);
  if (SWIG_arg_fail($svn_argnum)) {
    SWIG_fail;
  }
}
%apply long { short, int, ssize_t, enum SWIGTYPE, svn_boolean_t,
              apr_seek_where_t, apr_fileperms_t }
%apply unsigned long { unsigned char, unsigned short, unsigned int, size_t }

%clear long long;
%clear unsigned long long;

/* These typemaps use apr_int64_t so that they will work on Win32 and Unix */
%typemap (in) long long
  " $1 = ($1_ltype) PyLong_AsLongLong($input); ";

%typemap (in) unsigned long long
  " $1 = ($1_ltype) PyLong_AsUnsignedLongLong($input); ";

%typemap (out) apr_time_t, apr_int64_t, long long, __int64
  " $result = PyLong_FromLongLong((apr_int64_t)($1)); ";

%typemap (out) apr_uint64_t, unsigned long long, unsigned __int64
  " $result = PyLong_FromUnsignedLongLong((apr_uint64_t)($1)); ";

%typemap(in,numinputs=0) long long *OUTPUT (apr_int64_t temp)
    "$1 = &temp;";
%typemap(argout) long long *OUTPUT {
  %append_output(PyLong_FromLongLong(*$1));
}

#endif


#ifdef SWIGRUBY
%clear long long;

%typemap (in) long long
{
  $1 = ($1_ltype)NUM2LL($input);
}

%typemap (out) long long
{
  $result = LL2NUM(($1_ltype)($1));
}

%typemap(argout) long long *OUTPUT
{
  %append_output(LL2NUM(*$1));
}

%clear unsigned long long;

%typemap (in) unsigned long long
{
  $1 = ($1_ltype)NUM2ULL($input);
}