From 325f274af92e1fbce0d1a54feb1ccae63afaa5ae Mon Sep 17 00:00:00 2001 From: mescalinum Date: Fri, 11 Nov 2011 16:41:47 +0000 Subject: typos svn path=/trunk/externals/loaders/tclpd/; revision=15725 --- tcl.i | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/tcl.i b/tcl.i index f1fa501..af4628b 100644 --- a/tcl.i +++ b/tcl.i @@ -61,7 +61,7 @@ for(i = 0; i < len; i++) { oi = Tcl_ListObjIndex(tcl_for_pd, $input, i, &oi); if(tcl_to_pdatom(oi, $2[i]) == TCL_ERROR) { - SWIG_Fail; + SWIG_fail; } } } @@ -69,19 +69,19 @@ %typemap(in) t_atom * { t_atom *a = (t_atom*)getbytes(sizeof(t_atom)); if(tcl_to_pdatom($input, a) == TCL_ERROR) { - SWIG_Fail; + SWIG_fail; } $1 = a; } %typemap(freearg) t_atom * { - freebytes($input, sizeof(t_atom)); + freebytes($1, sizeof(t_atom)); } %typemap(out) t_atom * { Tcl_Obj* res_obj; - if(pdatom_to_tcl($input, &res_obj) == TCL_ERROR) { - SWIG_Fail; + if(pdatom_to_tcl($1, &res_obj) == TCL_ERROR) { + SWIG_fail; } Tcl_SetObjResult(tcl_for_pd, res_obj); } @@ -89,15 +89,15 @@ %typemap(in) t_symbol * { t_symbol *s; if(tcl_to_pdsymbol($input, &s) == TCL_ERROR) { - SWIG_Fail; + SWIG_fail; } $1 = s; } %typemap(out) t_symbol * { Tcl_Obj* res_obj; - if(pdsymbol_to_tcl($input, &res_obj) == TCL_ERROR) { - SWIG_Fail; + if(pdsymbol_to_tcl($1, &res_obj) == TCL_ERROR) { + SWIG_fail; } Tcl_SetObjResult(tcl_for_pd, res_obj); } -- cgit v1.2.1