433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
|
int register_tcl(
Jim_Interp *interp,
void *pContext
){
int i;
/* Add the Tcl integration commands to Jim. */
for(i=0; i<(sizeof(aCommand)/sizeof(aCommand[0])); i++){
if ( !aCommand[i].zName || !aCommand[i].xProc ) continue;
void *ctx = aCommand[i].pContext;
/* Use Tcl interpreter for context? */
if( !ctx ) ctx = pContext;
Jim_CreateCommand(interp, aCommand[i].zName, aCommand[i].xProc, ctx, NULL);
}
return JIM_OK;
}
|
>
|
|
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
|
int register_tcl(
Jim_Interp *interp,
void *pContext
){
int i;
/* Add the Tcl integration commands to Jim. */
for(i=0; i<(sizeof(aCommand)/sizeof(aCommand[0])); i++){
void *ctx;
if ( !aCommand[i].zName || !aCommand[i].xProc ) continue;
ctx = aCommand[i].pContext;
/* Use Tcl interpreter for context? */
if( !ctx ) ctx = pContext;
Jim_CreateCommand(interp, aCommand[i].zName, aCommand[i].xProc, ctx, NULL);
}
return JIM_OK;
}
|