Cross Reference: /osnet-11/usr/src/lib/libsqlite/src/test4.c

Lines Matching refs:interp
105 static int parse_thread_id(Tcl_Interp *interp, const char *zArg){
107     Tcl_AppendResult(interp, "thread ID must be an upper case letter", 0);
121   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
130     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
134   i = parse_thread_id(interp, argv[1]);
137     Tcl_AppendResult(interp, "thread ", argv[1], " is already running", 0);
147     Tcl_AppendResult(interp, "failed to create the thread", 0);
170   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
177     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
181   i = parse_thread_id(interp, argv[1]);
184     Tcl_AppendResult(interp, "no such thread", 0);
214   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
221     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
230     i = parse_thread_id(interp, argv[1]);
233       Tcl_AppendResult(interp, "no such thread", 0);
249   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
257     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
261   i = parse_thread_id(interp, argv[1]);
264     Tcl_AppendResult(interp, "no such thread", 0);
269   Tcl_AppendResult(interp, zBuf, 0);
281   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
289     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
293   i = parse_thread_id(interp, argv[1]);
296     Tcl_AppendResult(interp, "no such thread", 0);
299   if( Tcl_GetInt(interp, argv[2], &n) ) return TCL_ERROR;
302     Tcl_AppendResult(interp, "column number out of range", 0);
305   Tcl_AppendResult(interp, threadset[i].argv[n], 0);
317   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
325     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
329   i = parse_thread_id(interp, argv[1]);
332     Tcl_AppendResult(interp, "no such thread", 0);
335   if( Tcl_GetInt(interp, argv[2], &n) ) return TCL_ERROR;
338     Tcl_AppendResult(interp, "column number out of range", 0);
341   Tcl_AppendResult(interp, threadset[i].colv[n], 0);
353   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
361     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
365   i = parse_thread_id(interp, argv[1]);
368     Tcl_AppendResult(interp, "no such thread", 0);
403   Tcl_AppendResult(interp, zName, 0);
415   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
422     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
426   i = parse_thread_id(interp, argv[1]);
429     Tcl_AppendResult(interp, "no such thread", 0);
433   Tcl_AppendResult(interp, threadset[i].zErr, 0);
460   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
466     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
470   i = parse_thread_id(interp, argv[1]);
473     Tcl_AppendResult(interp, "no such thread", 0);
503   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
509     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
513   i = parse_thread_id(interp, argv[1]);
516     Tcl_AppendResult(interp, "no such thread", 0);
545   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
551     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
555   i = parse_thread_id(interp, argv[1]);
558     Tcl_AppendResult(interp, "no such thread", 0);
576   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */
583     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],
587   i = parse_thread_id(interp, argv[1]);
590     Tcl_AppendResult(interp, "no such thread", 0);
594   j = parse_thread_id(interp, argv[2]);
597     Tcl_AppendResult(interp, "no such thread", 0);
610 int Sqlitetest4_Init(Tcl_Interp *interp){
631     Tcl_CreateCommand(interp, aCmd[i].zName, aCmd[i].xProc, 0, 0);
636 int Sqlitetest4_Init(Tcl_Interp *interp){ return TCL_OK; }