421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
|
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
|
-
+
|
thread_interp_reset_key = global_interp_reset_key;
if (interp == NULL) {
interp = appfs_create_TclInterp(NULL);
if (interp == NULL) {
APPFS_DEBUG("Create interp failed, returningin failure.");
APPFS_DEBUG("Create interp failed, returning in failure.");
return(NULL);
}
pthread_ret = pthread_setspecific(interpKey, interp);
if (pthread_ret != 0) {
APPFS_DEBUG("pthread_setspecific() failed. Terminating Tcl interpreter.");
|