Searched refs:interp (Results 1 - 25 of 1091) sorted by relevance

1234567891011>>

/macosx-10.10/tcl-105/tcl_ext/tclx/tclx/generic/
H A DtclXinit.c41 static int Tclxcmd_Init _ANSI_ARGS_((Tcl_Interp *interp));
53 Tclx_Init (interp)
54 Tcl_Interp *interp;
56 if (Tclx_SafeInit(interp) != TCL_OK) {
60 if ((Tcl_EvalEx(interp, initScript, -1,
62 || (TclX_LibraryInit(interp) != TCL_OK)) {
63 Tcl_AddErrorInfo(interp, "\n (in TclX_Init)");
79 Tclx_SafeInit (interp)
80 Tcl_Interp *interp;
84 (Tcl_InitStubs(interp, "8.
[all...]
/macosx-10.10/swig-12/Lib/tcl/
H A Dtclinterp.i7 * Tcl_Interp *interp
11 * if you just need the interp value for some reason. When used,
12 * the 'interp' parameter becomes hidden in the Tcl interface--that
17 %typemap(in,numinputs=0) Tcl_Interp *interp {
18 $1 = interp;
/macosx-10.10/tcl-105/tcl84/tcl/unix/dltest/
H A Dpkge.c29 * Returns TCL_ERROR and leaves an error message in interp->result.
38 Pkge_Init(interp)
39 Tcl_Interp *interp; /* Interpreter in which the package is
43 if (Tcl_InitStubs(interp, TCL_VERSION, 1) == NULL) {
46 return Tcl_Eval(interp, script);
H A Dpkgf.c22 Tcl_Interp *interp, int argc, char **argv));
24 Tcl_Interp *interp, int argc, char **argv));
36 * Returns TCL_ERROR and leaves an error message in interp->result.
45 Pkgf_Init(interp)
46 Tcl_Interp *interp; /* Interpreter in which the package is
50 if (Tcl_InitStubs(interp, TCL_VERSION, 1) == NULL) {
53 return Tcl_Eval(interp, script);
H A Dpkgb.c22 Tcl_Interp *interp, int objc, Tcl_Obj * CONST objv[]));
24 Tcl_Interp *interp, int objc, Tcl_Obj * CONST objv[]));
45 Pkgb_SubObjCmd(dummy, interp, objc, objv)
47 Tcl_Interp *interp; /* Current interpreter. */
54 Tcl_WrongNumArgs(interp, 1, objv, "num num");
57 if ((Tcl_GetIntFromObj(interp, objv[1], &first) != TCL_OK)
58 || (Tcl_GetIntFromObj(interp, objv[2], &second) != TCL_OK)) {
61 Tcl_SetObjResult(interp, Tcl_NewIntObj(first - second));
84 Pkgb_UnsafeObjCmd(dummy, interp, objc, objv)
86 Tcl_Interp *interp; /* Curren
[all...]
H A Dpkgc.c22 Tcl_Interp *interp, int objc, Tcl_Obj * CONST objv[]));
24 Tcl_Interp *interp, int objc, Tcl_Obj * CONST objv[]));
45 Pkgc_SubObjCmd(dummy, interp, objc, objv)
47 Tcl_Interp *interp; /* Current interpreter. */
54 Tcl_WrongNumArgs(interp, 1, objv, "num num");
57 if ((Tcl_GetIntFromObj(interp, objv[1], &first) != TCL_OK)
58 || (Tcl_GetIntFromObj(interp, objv[2], &second) != TCL_OK)) {
61 Tcl_SetObjResult(interp, Tcl_NewIntObj(first - second));
84 Pkgc_UnsafeObjCmd(dummy, interp, objc, objv)
86 Tcl_Interp *interp; /* Curren
[all...]
H A Dpkgd.c23 Tcl_Interp *interp, int objc, Tcl_Obj * CONST objv[]));
25 Tcl_Interp *interp, int objc, Tcl_Obj * CONST objv[]));
46 Pkgd_SubObjCmd(dummy, interp, objc, objv)
48 Tcl_Interp *interp; /* Current interpreter. */
55 Tcl_WrongNumArgs(interp, 1, objv, "num num");
58 if ((Tcl_GetIntFromObj(interp, objv[1], &first) != TCL_OK)
59 || (Tcl_GetIntFromObj(interp, objv[2], &second) != TCL_OK)) {
62 Tcl_SetObjResult(interp, Tcl_NewIntObj(first - second));
85 Pkgd_UnsafeObjCmd(dummy, interp, objc, objv)
87 Tcl_Interp *interp; /* Curren
[all...]
/macosx-10.10/tcl-105/tcl_ext/tkimg/tkimg/libpng/
H A Dpngtcl.c42 Pngtcl_Init (interp)
43 Tcl_Interp *interp; /* Interpreter to initialise. */
47 if (Tcl_InitStubs(interp, "8.3", 0) == NULL) {
50 if (Zlibtcl_InitStubs(interp, ZLIBTCL_VERSION, 1) == NULL) {
54 if (Tcl_PkgProvideEx(interp, PACKAGE_NAME, PACKAGE_VERSION,
81 Pngtcl_SafeInit (interp)
82 Tcl_Interp *interp; /* Interpreter to initialise. */
84 return Pngtcl_Init(interp);
/macosx-10.10/tcl-105/tcl_ext/tkimg/tkimg/libjpeg/
H A Djpegtcl.c41 Jpegtcl_Init (interp)
42 Tcl_Interp *interp; /* Interpreter to initialise. */
46 if (Tcl_InitStubs(interp, "8.3", 0) == NULL) {
49 if (Tcl_PkgProvideEx(interp, PACKAGE_NAME, PACKAGE_VERSION,
76 Jpegtcl_SafeInit (interp)
77 Tcl_Interp *interp; /* Interpreter to initialise. */
79 return Jpegtcl_Init(interp);
/macosx-10.10/tcl-105/tcl_ext/tkimg/tkimg/libtiff/
H A Dtifftcl.c27 extern DLLEXPORT int Tifftcl_Init(Tcl_Interp *interp);
28 extern DLLEXPORT int Tifftcl_SafeInit(Tcl_Interp *interp);
52 Tifftcl_Init (interp)
53 Tcl_Interp *interp; /* Interpreter to initialise. */
57 if (Tcl_InitStubs(interp, "8.3", 0) == NULL) {
60 if (Tcl_PkgProvideEx(interp, PACKAGE_NAME, PACKAGE_VERSION,
87 Tifftcl_SafeInit (interp)
88 Tcl_Interp *interp; /* Interpreter to initialise. */
90 return Tifftcl_Init(interp);
/macosx-10.10/tcl-105/tcl/tcl/unix/dltest/
H A Dpkge.c29 * Returns TCL_ERROR and leaves an error message in interp->result.
39 Tcl_Interp *interp) /* Interpreter in which the package is to be
44 if (Tcl_InitStubs(interp, TCL_VERSION, 0) == NULL) {
47 return Tcl_Eval(interp, script);
37 Pkge_Init( Tcl_Interp *interp) argument
/macosx-10.10/tcl-105/tcl_ext/tdom/tdom/generic/
H A Dtdominit.c65 Tdom_Init (interp)
66 Tcl_Interp *interp; /* Interpreter to initialize. */
70 Tcl_InitStubs(interp, "8", 0);
80 Tcl_Eval(interp, "rename unknown unknown_tdom");
81 Tcl_CreateObjCommand(interp, "unknown", tcldom_unknownCmd, NULL, NULL );
84 Tcl_CreateObjCommand(interp, "dom", tcldom_DomObjCmd, NULL, NULL );
85 Tcl_CreateObjCommand(interp, "domDoc", tcldom_DocObjCmd, NULL, NULL );
86 Tcl_CreateObjCommand(interp, "domNode", tcldom_NodeObjCmd, NULL, NULL );
87 Tcl_CreateObjCommand(interp, "tdom", TclTdomObjCmd, NULL, NULL );
90 Tcl_CreateObjCommand(interp, "expa
[all...]
/macosx-10.10/tcl-105/tcl_ext/tclx/tclx/unix/
H A DtclXunixTest.c23 Tcltest_Init _ANSI_ARGS_((Tcl_Interp *interp));
26 Tclxtest_Init _ANSI_ARGS_((Tcl_Interp *interp));
60 * interp result if an error occurs.
64 Tcl_AppInit (interp)
65 Tcl_Interp *interp;
67 if (Tcl_Init (interp) == TCL_ERROR) {
71 if (Tclx_Init (interp) == TCL_ERROR) {
74 Tcl_StaticPackage (interp, "Tclx", Tclx_Init, Tclx_SafeInit);
76 if (Tcltest_Init (interp) == TCL_ERROR) {
79 Tcl_StaticPackage(interp, "Tcltes
[all...]
H A DtclXAppInit.c65 * interp result if an error occurs.
70 Tcl_AppInit (Tcl_Interp *interp)
73 Tcl_AppInit (interp)
74 Tcl_Interp *interp;
77 if (Tcl_Init (interp) == TCL_ERROR) {
81 if (Tclx_Init (interp) == TCL_ERROR) {
84 Tcl_StaticPackage (interp, "Tclx", Tclx_Init, Tclx_SafeInit);
97 Tcl_SetVar(interp, "tcl_rcFileName", "~/.tclrc", TCL_GLOBAL_ONLY);
68 Tcl_AppInit(Tcl_Interp *interp) argument
/macosx-10.10/tcl-105/tcl_ext/tdom/tdom/unix/
H A DtclAppInit.c36 extern int Tdom_Init _ANSI_ARGS_((Tcl_Interp *interp));
37 extern int Tdom_SafeInit _ANSI_ARGS_((Tcl_Interp *interp));
58 Tcl_AppInit(interp)
59 Tcl_Interp *interp;
61 if (Tcl_Init(interp) == TCL_ERROR) {
64 if (Tdom_Init(interp) == TCL_ERROR) {
67 Tcl_StaticPackage(interp, "tdom", Tdom_Init, Tdom_SafeInit);
68 Tcl_SetVar(interp, "tcl_rcFileName", "~/.tcldomshrc", TCL_GLOBAL_ONLY);
/macosx-10.10/tcl-105/tcl_ext/tktable/tktable/generic/
H A DtkAppInit.c27 EXTERN int Tktable_Init _ANSI_ARGS_((Tcl_Interp *interp));
29 EXTERN int Tcltest_Init _ANSI_ARGS_((Tcl_Interp *interp));
30 EXTERN int Tktest_Init _ANSI_ARGS_((Tcl_Interp *interp));
72 * message in interp->result if an error occurs.
81 Tcl_AppInit(interp)
82 Tcl_Interp *interp; /* Interpreter for application. */
84 if (Tcl_Init(interp) == TCL_ERROR) {
87 if (Tk_Init(interp) == TCL_ERROR) {
90 Tcl_StaticPackage(interp, "Tk", Tk_Init, (Tcl_PackageInitProc *) NULL);
92 if (Tcltest_Init(interp)
[all...]
/macosx-10.10/tcl-105/tcl_ext/xotcl/xotcl/unix/
H A DtclAppInit.c23 extern int Procbodytest_Init _ANSI_ARGS_((Tcl_Interp *interp));
24 extern int Procbodytest_SafeInit _ANSI_ARGS_((Tcl_Interp *interp));
25 extern int TclObjTest_Init _ANSI_ARGS_((Tcl_Interp *interp));
26 extern int Tcltest_Init _ANSI_ARGS_((Tcl_Interp *interp));
28 extern int TclThread_Init _ANSI_ARGS_((Tcl_Interp *interp));
35 extern int Tclxttest_Init _ANSI_ARGS_((Tcl_Interp *interp));
71 extern int TCL_LOCAL_APPINIT _ANSI_ARGS_((Tcl_Interp *interp));
108 * message in the interp's result if an error occurs.
117 Tcl_AppInit(interp)
118 Tcl_Interp *interp; /* Interprete
[all...]
H A DtkAppInit.c60 * message in interp->result if an error occurs.
69 Tcl_AppInit(interp)
70 Tcl_Interp *interp; /* Interpreter for application. */
72 if (Tcl_Init(interp) == TCL_ERROR) {
75 if (Tk_Init(interp) == TCL_ERROR) {
78 if (Xotcl_Init(interp) == TCL_ERROR) {
81 Tcl_StaticPackage(interp, "Tk", Tk_Init, Tk_SafeInit);
82 Tcl_StaticPackage(interp, "XOTcl", Xotcl_Init, 0);
84 if (Tcl_Import(interp, Tcl_GetGlobalNamespace(interp),
[all...]
/macosx-10.10/tcl-105/tcl_ext/tclx/tclx/win/
H A DtclXwinTest.c23 Tcltest_Init (Tcl_Interp *interp);
26 Tclxtest_Init (Tcl_Interp *interp);
55 * interp result if an error occurs.
59 Tcl_AppInit (Tcl_Interp *interp)
61 if (Tcl_Init (interp) == TCL_ERROR) {
65 if (Tclx_Init (interp) == TCL_ERROR) {
68 Tcl_StaticPackage (interp, "Tclx", Tclx_Init, Tclx_SafeInit);
70 if (Tcltest_Init (interp) == TCL_ERROR) {
73 Tcl_StaticPackage(interp, "Tcltest", Tcltest_Init,
76 if (Tclxtest_Init (interp)
57 Tcl_AppInit(Tcl_Interp *interp) argument
[all...]
H A DtclXAppInit.c39 * interp result if an error occurs.
43 TclX_AppInit (Tcl_Interp *interp)
45 if (Tcl_Init (interp) == TCL_ERROR) {
48 if (Tclx_Init (interp) == TCL_ERROR) {
51 Tcl_StaticPackage (interp, "Tclx", Tclx_Init, Tclx_SafeInit);
64 Tcl_SetVar(interp, "tcl_rcFileName", "~/.tclrc", TCL_GLOBAL_ONLY);
42 TclX_AppInit(Tcl_Interp *interp) argument
/macosx-10.10/tcl-105/tcl_ext/tclae/tclae/generic/
H A DtclAEInit.c55 Tclae_Init(Tcl_Interp *interp)
64 Tcl_ResetResult(interp);
65 Tcl_AppendResult(interp, "The AppleEvent Manager is either missing or misbehaving",
71 if (Tcl_InitStubs(interp, "8.0", 0) == NULL) {
74 if (Tcl_PkgRequire(interp, "Tcl", TCL_VERSION, 0) == NULL) {
76 if (Tcl_PkgRequire(interp, "Tcl", "8.0", 0) == NULL) {
82 if (Tcl_PkgProvide(interp, TCLAE_NAME, TCLAE_BASIC_VERSION) != TCL_OK) {
87 Tcl_SetVar(interp, "tclAE_version", TCLAE_VERSION, TCL_GLOBAL_ONLY);
89 tclAE_macRoman_encoding = Tcl_GetEncoding(interp,"macRoman");
93 TclaeInitEventHandlers(interp);
54 Tclae_Init(Tcl_Interp *interp) argument
[all...]
/macosx-10.10/OpenLDAP-499.27/OpenLDAP/contrib/ldaptcl/
H A DtclAppInit.c27 EXTERN int Tcltest_Init _ANSI_ARGS_((Tcl_Interp *interp));
73 * message in interp->result if an error occurs.
82 Tcl_AppInit(interp)
83 Tcl_Interp *interp; /* Interpreter for application. */
85 if (Tcl_Init(interp) == TCL_ERROR) {
90 if (Itcl_Init(interp) == TCL_ERROR) {
93 Tcl_StaticPackage (interp, "Itcl", Itcl_Init, NULL);
97 if (Tcltest_Init(interp) == TCL_ERROR) {
100 Tcl_StaticPackage(interp, "Tcltest", Tcltest_Init,
105 if (Tclx_Init (interp)
[all...]
H A DtkAppInit.c70 * interp->result if an error occurs.
75 Tcl_AppInit (Tcl_Interp *interp)
78 Tcl_AppInit (interp)
79 Tcl_Interp *interp;
82 if (Tcl_Init (interp) == TCL_ERROR) {
86 if (Tclx_Init(interp) == TCL_ERROR) {
89 Tcl_StaticPackage(interp, "Tclx", Tclx_Init, Tclx_SafeInit);
91 if (Tk_Init(interp) == TCL_ERROR) {
94 Tcl_StaticPackage(interp, "Tk", Tk_Init, (Tcl_PackageInitProc *) NULL);
96 if (Tkx_Init(interp)
73 Tcl_AppInit(Tcl_Interp *interp) argument
[all...]
/macosx-10.10/tcl-105/tk/tk/unix/
H A DtkAppInit.c20 extern int Tktest_Init _ANSI_ARGS_((Tcl_Interp *interp));
56 extern int TK_LOCAL_APPINIT _ANSI_ARGS_((Tcl_Interp *interp));
85 * the interp's result if an error occurs.
95 Tcl_Interp *interp) /* Interpreter for application. */
97 if (Tcl_Init(interp) == TCL_ERROR) {
100 if (Tk_Init(interp) == TCL_ERROR) {
103 Tcl_StaticPackage(interp, "Tk", Tk_Init, Tk_SafeInit);
105 if (Tktest_Init(interp) == TCL_ERROR) {
108 Tcl_StaticPackage(interp, "Tktest", Tktest_Init,
116 * if (Mod_Init(interp)
92 Tcl_AppInit( Tcl_Interp *interp) argument
[all...]
/macosx-10.10/tcl-105/tcl_ext/tkimg/tkimg/zlib/src/
H A Dzlibtcl.c48 Tcl_Interp *interp /* Interpreter to initialise. */
50 if (!Tcl_InitStubs(interp, "8.3", 0)) {
54 if (Tcl_PkgProvideEx(interp, PACKAGE_NAME, PACKAGE_VERSION,
82 Tcl_Interp *interp /* Interpreter to initialise. */
84 return Zlibtcl_Init(interp);

Completed in 184 milliseconds

1234567891011>>