050219d998
Conflicts: .project COPYRIGHT Doc/Manual/style.css Examples/Makefile.in Examples/test-suite/common.mk Lib/typemaps/strings.swg Makefile.in Source/DOH/fio.c Source/Makefile.am Source/Modules/emit.cxx Source/Modules/javascript.cxx configure.in git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/branches/oliverb-javascript-v8@13764 626c5289-ae23-0410-ae9c-e8d60b6d4f22
26 lines
770 B
OpenEdge ABL
26 lines
770 B
OpenEdge ABL
/* -----------------------------------------------------------------------------
|
|
* ccomplex.i
|
|
*
|
|
* C complex typemaps
|
|
* ISO C99: 7.3 Complex arithmetic <complex.h>
|
|
* ----------------------------------------------------------------------------- */
|
|
|
|
|
|
%include <javscriptcomplex.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);
|