1 static char help[] = "Tests PetscLogView() called with no PetscGlobalArgc and PetscGlobalArgs.\n\n";
2
3 #include <petscsys.h>
4 #include <petscvec.h>
5
main(int argc,char ** args)6 int main(int argc, char **args)
7 {
8 Vec vec;
9 PetscBool flg = PETSC_FALSE;
10 PetscViewer viewer;
11
12 PetscFunctionBegin;
13 PetscCall(PetscInitialize(NULL, NULL, NULL, help));
14 PetscCall(PetscLogDefaultBegin());
15 PetscCall(PetscViewerCreate(PETSC_COMM_SELF, &viewer));
16 PetscCall(PetscViewerSetType(viewer, PETSCVIEWERASCII));
17 for (PetscInt i = 1; i < argc; ++i) {
18 PetscCall(PetscStrcmp(args[i], "foo", &flg));
19 if (flg) break;
20 }
21 if (flg) {
22 PetscCall(VecCreate(PETSC_COMM_SELF, &vec));
23 PetscCall(VecDestroy(&vec));
24 }
25 PetscCall(PetscLogView(viewer));
26 PetscCall(PetscViewerDestroy(&viewer));
27 PetscCall(PetscFinalize());
28 return 0;
29 }
30
31 /*TEST
32
33 testset:
34 requires: defined(PETSC_USE_LOG)
35 nsize: 1
36 filter: grep -E "^ (Vector|Viewer)"
37 test:
38 suffix: 1
39 output_file: output/ex81_1.out
40 test:
41 suffix: 2
42 args: foo
43 output_file: output/ex81_2.out
44
45 TEST*/
46