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
21