Index: generic/xotclProfile.c =================================================================== diff -u -rc72f9f638677608fab1502cd696c8f2d6b2952f9 -r54346e996575a3c1295e4a36c07fd490e63bc5a6 --- generic/xotclProfile.c (.../xotclProfile.c) (revision c72f9f638677608fab1502cd696c8f2d6b2952f9) +++ generic/xotclProfile.c (.../xotclProfile.c) (revision 54346e996575a3c1295e4a36c07fd490e63bc5a6) @@ -47,13 +47,13 @@ } void -XOTclProfileEvaluateData(Tcl_Interp* in, long int startSec, long int startUsec, +XOTclProfileEvaluateData(Tcl_Interp* interp, long int startSec, long int startUsec, XOTclObject* obj, XOTclClass *cl, char *methodName) { double totalMicroSec; struct timeval trt; Tcl_DString objectKey, methodKey; - XOTclProfile* profile = &RUNTIME_STATE(in)->profile; + XOTclProfile* profile = &RUNTIME_STATE(interp)->profile; gettimeofday(&trt, NULL); @@ -116,8 +116,8 @@ } void -XOTclProfilePrintData(Tcl_Interp* in) { - XOTclProfile* profile = &RUNTIME_STATE(in)->profile; +XOTclProfilePrintData(Tcl_Interp *interp) { + XOTclProfile* profile = &RUNTIME_STATE(interp)->profile; fprintf(stderr, "------------------------------------------------------------------\n"); fprintf(stderr, "\nXOTcl Profile Information\n\n"); @@ -134,11 +134,11 @@ } void -XOTclProfileInit(Tcl_Interp* in) { - RUNTIME_STATE(in)->profile.overallTime = 0; - Tcl_InitHashTable(&RUNTIME_STATE(in)->profile.objectData, +XOTclProfileInit(Tcl_Interp *interp) { + RUNTIME_STATE(interp)->profile.overallTime = 0; + Tcl_InitHashTable(&RUNTIME_STATE(interp)->profile.objectData, TCL_STRING_KEYS); - Tcl_InitHashTable(&RUNTIME_STATE(in)->profile.methodData, + Tcl_InitHashTable(&RUNTIME_STATE(interp)->profile.methodData, TCL_STRING_KEYS); }