1 #include <petsc/private/petscimpl.h> 2 3 void testValidPointers(void *a, char *b, PetscInt *c, PetscMPIInt *d, PetscInt64 *e, PetscBool *f, PetscScalar *g, PetscReal *h) 4 { 5 /* incorrect */ 6 PetscValidCharPointer(a,2); 7 PetscValidIntPointer(b,3); 8 PetscValidBoolPointer(c,4); 9 PetscValidRealPointer(d,5); 10 PetscValidScalarPointer(e,6); 11 PetscValidIntPointer(f,7); 12 PetscValidRealPointer(g,8); 13 PetscValidScalarPointer(h,9); 14 15 /* correct */ 16 PetscValidPointer(a,1); 17 PetscValidCharPointer(b,2); 18 PetscValidIntPointer(c,3); 19 PetscValidIntPointer(d,4); 20 PetscValidIntPointer(e,5); 21 PetscValidBoolPointer(f,6); 22 PetscValidScalarPointer(g,7); 23 PetscValidRealPointer(h,8); 24 return; 25 } 26 27 void testValidPointers2(void *a, char *b, PetscInt *c, PetscMPIInt *d, PetscInt64 *e, PetscBool *f, PetscScalar *g, PetscReal *h) 28 { 29 /* incorrect */ 30 PetscValidCharPointer(a,2); 31 PetscValidPointer(b,3); 32 PetscValidPointer(c,4); 33 PetscValidPointer(d,5); 34 PetscValidPointer(e,6); 35 PetscValidPointer(f,7); 36 PetscValidPointer(g,8); 37 PetscValidPointer(h,9); 38 39 /* correct */ 40 PetscValidPointer(a,1); 41 PetscValidCharPointer(b,2); 42 PetscValidIntPointer(c,3); 43 PetscValidIntPointer(d,4); 44 PetscValidIntPointer(e,5); 45 PetscValidBoolPointer(f,6); 46 PetscValidScalarPointer(g,7); 47 PetscValidRealPointer(h,8); 48 return; 49 } 50 51 void testValidPointers3(void **a, char **b, PetscInt **c, PetscMPIInt **d, PetscInt64 **e, PetscBool **f, PetscScalar **g, PetscReal **h) 52 { 53 /* incorrect */ 54 PetscValidCharPointer(a,1); 55 PetscValidCharPointer(b,2); 56 PetscValidIntPointer(c,3); 57 PetscValidIntPointer(d,4); 58 PetscValidIntPointer(e,5); 59 PetscValidBoolPointer(f,6); 60 PetscValidScalarPointer(g,7); 61 PetscValidRealPointer(h,8); 62 63 /* correct */ 64 PetscValidPointer(a,1); 65 PetscValidPointer(b,2); 66 PetscValidPointer(c,3); 67 PetscValidPointer(d,4); 68 PetscValidPointer(e,5); 69 PetscValidPointer(f,6); 70 PetscValidPointer(g,7); 71 PetscValidPointer(h,8); 72 return; 73 } 74