xref: /petsc/src/sys/tests/linter/testValidLogicalCollective.c (revision 4ab547ceb31cf8c1287f5da2fc6aa6a54e2c08bd)

#include <petsc/private/viewerimpl.h>

PetscErrorCode testValidLogicalCollective(PetscInt a, PetscMPIInt b, PetscInt c, PetscBool d, PetscScalar e, PetscReal f)
{
  PetscViewer v; /* dummy variable to satisfy the PetscObject for the following */

  /* incorrect */
  PetscValidLogicalCollectiveInt(v, d, 2);
  PetscValidLogicalCollectiveEnum(v, e, 3);
  PetscValidLogicalCollectiveMPIInt(v, f, 4);
  PetscValidLogicalCollectiveScalar(v, a, 5);
  PetscValidLogicalCollectiveReal(v, b, 6);
  PetscValidLogicalCollectiveEnum(v, c, 7);

  /* correct */
  PetscValidLogicalCollectiveInt(v, a, 1);
  PetscValidLogicalCollectiveMPIInt(v, b, 2);
  PetscValidLogicalCollectiveInt(v, c, 3);
  PetscValidLogicalCollectiveBool(v, d, 4);
  PetscValidLogicalCollectiveScalar(v, e, 5);
  PetscValidLogicalCollectiveReal(v, f, 6);
  return 0;
}