1@@ -4,5 +4,5 @@ 2 #include <petsc/private/petscimpl.h> 3 4-PetscErrorCode testTypes(PetscRandom r, PetscViewer v, PetscObject o, PetscFunctionList f) 5+static PetscErrorCode testTypes(PetscRandom r, PetscViewer v, PetscObject o, PetscFunctionList f) 6 { 7 /* incorrect */ 8@@ -7,5 +7,5 @@ 9 { 10 /* incorrect */ 11- PetscValidType(r, -1); 12+ PetscValidType(r, 1); 13 PetscCheckSameType(r, -1, v, -1); 14 PetscCheckSameComm(o, -2, f, -2); 15@@ -8,5 +8,5 @@ 16 /* incorrect */ 17 PetscValidType(r, -1); 18- PetscCheckSameType(r, -1, v, -1); 19+ PetscCheckSameType(r, 1, v, 2); 20 PetscCheckSameComm(o, -2, f, -2); 21 PetscCheckSameTypeAndComm(r, -3, f, -3); 22@@ -9,5 +9,5 @@ 23 PetscValidType(r, -1); 24 PetscCheckSameType(r, -1, v, -1); 25- PetscCheckSameComm(o, -2, f, -2); 26+ PetscCheckSameComm(o, 3, f, 4); 27 PetscCheckSameTypeAndComm(r, -3, f, -3); 28 29@@ -10,5 +10,5 @@ 30 PetscCheckSameType(r, -1, v, -1); 31 PetscCheckSameComm(o, -2, f, -2); 32- PetscCheckSameTypeAndComm(r, -3, f, -3); 33+ PetscCheckSameTypeAndComm(r, 1, f, 4); 34 35 /* correct */ 36