195   char *zProfile;            /* The profile callback routine */  member
629     if( pDb->zProfile ){  in delDatabaseRef()
630       Tcl_Free(pDb->zProfile);  in delDatabaseRef()
811   Tcl_DStringAppend(&str, pDb->zProfile, -1);  in DbProfileHandler()
3182       if( pDb->zProfile ){  in DbObjCmd()
3183         Tcl_AppendResult(interp, pDb->zProfile, (char*)0);  in DbObjCmd()
3186       char *zProfile;  in DbObjCmd()  local
3188       if( pDb->zProfile ){  in DbObjCmd()
3189         Tcl_Free(pDb->zProfile);  in DbObjCmd()
3191       zProfile = Tcl_GetStringFromObj(objv[2], &len);  in DbObjCmd()
3192       if( zProfile && len>0 ){  in DbObjCmd()
3193         pDb->zProfile = Tcl_Alloc( len + 1 );  in DbObjCmd()
3194         memcpy(pDb->zProfile, zProfile, len+1);  in DbObjCmd()
3196         pDb->zProfile = 0;  in DbObjCmd()
3200       if( pDb->zProfile ){  in DbObjCmd()