import source from 1.3.40
[external/swig.git] / Lib / tcl / tclinterp.i
1 /* -----------------------------------------------------------------------------
2  * See the LICENSE file for information on copyright, usage and redistribution
3  * of SWIG, and the README file for authors - http://www.swig.org/release.html.
4  *
5  * tclinterp.i
6  *
7  * Tcl_Interp *interp
8  *
9  * Passes the current Tcl_Interp value directly to a C function.
10  * This can be used to work with existing wrapper functions or
11  * if you just need the interp value for some reason.  When used,
12  * the 'interp' parameter becomes hidden in the Tcl interface--that
13  * is, you don't specify it explicitly. SWIG fills in its value
14  * automatically.
15  * ----------------------------------------------------------------------------- */
16
17 %typemap(in,numinputs=0) Tcl_Interp *interp {
18   $1 = interp;
19 }
20