59 …for (PetscInt i = 0; i < (*event)->recsize; i++) PetscCall(PetscFree((*event)->recorder.eventidx[i…  in TSEventDestroy()
60   PetscCall(PetscFree((*event)->recorder.eventidx));  in TSEventDestroy()
61   PetscCall(PetscFree((*event)->recorder.nevents));  in TSEventDestroy()
62   PetscCall(PetscFree((*event)->recorder.stepnum));  in TSEventDestroy()
63   PetscCall(PetscFree((*event)->recorder.time));  in TSEventDestroy()
376   PetscCall(PetscMalloc1(event->recsize, &event->recorder.time));  in TSSetEventHandler()
377   PetscCall(PetscMalloc1(event->recsize, &event->recorder.stepnum));  in TSSetEventHandler()
378   PetscCall(PetscMalloc1(event->recsize, &event->recorder.nevents));  in TSSetEventHandler()
379   PetscCall(PetscMalloc1(event->recsize, &event->recorder.eventidx));  in TSSetEventHandler()
380 … 0; i < event->recsize; i++) PetscCall(PetscMalloc1(event->nevents, &event->recorder.eventidx[i]));  in TSSetEventHandler()
382   event->recorder.ctr = 0;  in TSSetEventHandler()
413   PetscCall(PetscArraycpy(time, event->recorder.time, event->recsize));  in TSEventRecorderResize()
414   PetscCall(PetscArraycpy(stepnum, event->recorder.stepnum, event->recsize));  in TSEventRecorderResize()
415   PetscCall(PetscArraycpy(nevents, event->recorder.nevents, event->recsize));  in TSEventRecorderResize()
416 …recsize; i++) PetscCall(PetscArraycpy(eventidx[i], event->recorder.eventidx[i], event->recorder.ne…  in TSEventRecorderResize()
419   for (PetscInt i = 0; i < event->recsize; i++) PetscCall(PetscFree(event->recorder.eventidx[i]));  in TSEventRecorderResize()
420   PetscCall(PetscFree(event->recorder.eventidx));  in TSEventRecorderResize()
421   PetscCall(PetscFree(event->recorder.nevents));  in TSEventRecorderResize()
422   PetscCall(PetscFree(event->recorder.stepnum));  in TSEventRecorderResize()
423   PetscCall(PetscFree(event->recorder.time));  in TSEventRecorderResize()
426   event->recorder.time     = time;  in TSEventRecorderResize()
427   event->recorder.stepnum  = stepnum;  in TSEventRecorderResize()
428   event->recorder.nevents  = nevents;  in TSEventRecorderResize()
429   event->recorder.eventidx = eventidx;  in TSEventRecorderResize()
492   ctr = event->recorder.ctr;  in TSPostEvent()
494   event->recorder.time[ctr]    = t;  in TSPostEvent()
495   event->recorder.stepnum[ctr] = stepnum;  in TSPostEvent()
496   event->recorder.nevents[ctr] = event->nevents_zero;  in TSPostEvent()
497 …for (PetscInt i = 0; i < event->nevents_zero; i++) event->recorder.eventidx[ctr][i] = event->event…  in TSPostEvent()
498   event->recorder.ctr++;  in TSPostEvent()
954   ctr = event->recorder.ctr - 1;  in TSAdjointEventHandler()
955   if (ctr >= 0 && PetscAbsReal(t - event->recorder.time[ctr]) < PETSC_SMALL) {  in TSAdjointEventHandler()
958 …t post-event processing", (*event->postevent)(ts, event->recorder.nevents[ctr], event->recorder.ev…  in TSAdjointEventHandler()
959       event->recorder.ctr--;  in TSAdjointEventHandler()