35e6b73d2a
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/branches/oliverb-javascript-v8@13765 626c5289-ae23-0410-ae9c-e8d60b6d4f22
26 lines
771 B
OpenEdge ABL
26 lines
771 B
OpenEdge ABL
/* -----------------------------------------------------------------------------
|
|
* ccomplex.i
|
|
*
|
|
* C complex typemaps
|
|
* ISO C99: 7.3 Complex arithmetic <complex.h>
|
|
* ----------------------------------------------------------------------------- */
|
|
|
|
|
|
%include <javascriptcomplex.swg>
|
|
|
|
%{
|
|
#include <complex.h>
|
|
%}
|
|
|
|
|
|
/* C complex constructor */
|
|
#define CCplxConst(r, i) ((r) + I*(i))
|
|
|
|
%swig_cplxflt_convn(float complex, CCplxConst, creal, cimag);
|
|
%swig_cplxdbl_convn(double complex, CCplxConst, creal, cimag);
|
|
%swig_cplxdbl_convn(complex, CCplxConst, creal, cimag);
|
|
|
|
/* declaring the typemaps */
|
|
%typemaps_primitive(SWIG_TYPECHECK_CPLXFLT, float complex);
|
|
%typemaps_primitive(SWIG_TYPECHECK_CPLXDBL, double complex);
|
|
%typemaps_primitive(SWIG_TYPECHECK_CPLXDBL, complex);
|