160   char *zProfile;            /* The profile callback routine */  member
561     if( pDb->zProfile ){  in delDatabaseRef()
562       Tcl_Free(pDb->zProfile);  in delDatabaseRef()
743   Tcl_DStringAppend(&str, pDb->zProfile, -1);  in DbProfileHandler()
3100       if( pDb->zProfile ){  in DbObjCmd()
3101         Tcl_AppendResult(interp, pDb->zProfile, (char*)0);  in DbObjCmd()
3104       char *zProfile;  in DbObjCmd()  local
3106       if( pDb->zProfile ){  in DbObjCmd()
3107         Tcl_Free(pDb->zProfile);  in DbObjCmd()
3109       zProfile = Tcl_GetStringFromObj(objv[2], &len);  in DbObjCmd()
3110       if( zProfile && len>0 ){  in DbObjCmd()
3111         pDb->zProfile = Tcl_Alloc( len + 1 );  in DbObjCmd()
3112         memcpy(pDb->zProfile, zProfile, len+1);  in DbObjCmd()
3114         pDb->zProfile = 0;  in DbObjCmd()
3118       if( pDb->zProfile ){  in DbObjCmd()