/trunk/Examples/octave/operator/example.i
# · Swig · 25 lines · 17 code · 4 blank · 4 comment · 0 complexity · 395bdf3bbbd2bf729eb4e4bf784cdabf MD5 · raw file
- /* File : example.i */
- %module example
- #pragma SWIG nowarn=SWIGWARN_IGNORE_OPERATOR_EQ
- %{
- #include "example.h"
- %}
- /* Rename friend operator */
- %rename(op_scalar_mul_ComplexVal) operator*(const double&, const ComplexVal&);
- /* Now grab the original header file */
- %include "example.h"
- /* An output method that turns a complex into a short string */
- %extend ComplexVal {
- char *__str__() {
- static char temp[512];
- sprintf(temp,"(%g,%g)", $self->re(), $self->im());
- return temp;
- }
- ComplexVal __paren__(int j) {
- return ComplexVal($self->re()*j,$self->im()*j);
- }
- };