354           PetscStack *stack  = NULL;  in PetscObjectsDump()  local
358           PetscCall(PetscMallocGetStack(h, &stack));  in PetscObjectsDump()
359           if (stack) {  in PetscObjectsDump()
360             k = stack->currentsize - 2;  in PetscObjectsDump()
363               while (!stack->petscroutine[k]) k++;  in PetscObjectsDump()
364               PetscCall(PetscStrstr(stack->function[k], "Create", &create));  in PetscObjectsDump()
365               if (!create) PetscCall(PetscStrstr(stack->function[k], "Get", &create));  in PetscObjectsDump()
366               PetscCall(PetscStrstr(stack->function[k], h->class_name, &rclass));  in PetscObjectsDump()
374           PetscCall(PetscMallocGetStack(h, &stack));  in PetscObjectsDump()
375           if (stack) {  in PetscObjectsDump()
376 …; j--) fprintf(fd, "      [%d]  %s() in %s\n", PetscGlobalRank, stack->function[j], stack->file[j]…  in PetscObjectsDump()