1 2 static char help[] = "Tests deletion of mixed case options"; 3 4 #include <petscsys.h> 5 6 int main(int argc, char **argv) 7 { 8 PetscFunctionBeginUser; 9 PetscCall(PetscInitialize(&argc, &argv, NULL, help)); 10 PetscCall(PetscOptionsSetValue(NULL, "-abc", NULL)); 11 PetscCall(PetscOptionsSetValue(NULL, "-FOO", NULL)); 12 PetscCall(PetscOptionsClearValue(NULL, "-FOO")); 13 PetscCall(PetscOptionsView(NULL, NULL)); 14 PetscCall(PetscFinalize()); 15 return 0; 16 } 17 18 /*TEST 19 20 test: 21 args: -skip_petscrc -options_left 0 -use_gpu_aware_mpi 0 22 23 TEST*/ 24