/trunk/Examples/tcl/operator/example.i
# · Swig · 28 lines · 13 code · 8 blank · 7 comment · 0 complexity · 49c501d05e6bc7b962be1a82a725a05c MD5 · raw file
- /* File : example.i */
- %module example
- %{
- #include "example.h"
- %}
- /* This header file is a little tough to handle because it has overloaded
- operators and constructors. We're going to try and deal with that here */
- /* This turns the copy constructor in a function ComplexCopy() that can
- be called */
- %rename(ComplexCopy) Complex::Complex(Complex const &);
- /* Now grab the original header file */
- %include "example.h"
- /* An output method that turns a complex into a short string */
- %extend Complex {
- char *str() {
- static char temp[512];
- sprintf(temp,"(%g,%g)", $self->re(), $self->im());
- return temp;
- }
- };