| /petsc/src/vec/is/is/utils/ |
| H A D | iscomp.c | 38 const PetscInt *ptr1, *ptr2; in ISEqual() local
69 PetscCall(ISGetIndices(is2, &ptr2)); in ISEqual()
75 PetscCall(PetscArraycpy(a2, ptr2, sz2)); in ISEqual()
82 PetscCall(ISRestoreIndices(is2, &ptr2)); in ISEqual()
120 const PetscInt *ptr1, *ptr2; in ISEqualUnsorted() local
151 PetscCall(ISGetIndices(is2, &ptr2)); in ISEqualUnsorted()
153 PetscCall(PetscArraycmp(ptr1, ptr2, sz1, &flag)); in ISEqualUnsorted()
156 PetscCall(ISRestoreIndices(is2, &ptr2)); in ISEqualUnsorted()
|
| /petsc/src/sys/fileio/ |
| H A D | sysio.c | 25 char *ptr1, *ptr2 = (char *)&tmp; in PetscByteSwapEnum() local
30 for (i = 0; i < (PetscCount)sizeof(PetscEnum); i++) ptr2[i] = ptr1[sizeof(PetscEnum) - 1 - i]; in PetscByteSwapEnum()
31 for (i = 0; i < (PetscCount)sizeof(PetscEnum); i++) ptr1[i] = ptr2[i]; in PetscByteSwapEnum()
44 char *ptr1, *ptr2 = (char *)&tmp; in PetscByteSwapBool() local
49 for (i = 0; i < (PetscCount)sizeof(PetscBool); i++) ptr2[i] = ptr1[sizeof(PetscBool) - 1 - i]; in PetscByteSwapBool()
50 for (i = 0; i < (PetscCount)sizeof(PetscBool); i++) ptr1[i] = ptr2[i]; in PetscByteSwapBool()
63 char *ptr1, *ptr2 = (char *)&tmp; in PetscByteSwapInt() local
68 for (i = 0; i < (PetscCount)sizeof(PetscInt); i++) ptr2[i] = ptr1[sizeof(PetscInt) - 1 - i]; in PetscByteSwapInt()
69 for (i = 0; i < (PetscCount)sizeof(PetscInt); i++) ptr1[i] = ptr2[i]; in PetscByteSwapInt()
82 char *ptr1, *ptr2 = (char *)&tmp; in PetscByteSwapInt64() local
[all …]
|
| /petsc/src/sys/classes/viewer/impls/socket/mex-scripts/ |
| H A D | bread.c | 20 char *ptr1, *ptr2 = (char *)&tmp; in SYByteSwapInt() local
23 for (PetscCount i = 0; i < sizeof(int); i++) ptr2[i] = ptr1[sizeof(int) - 1 - i]; in SYByteSwapInt()
33 char *ptr1, *ptr2 = (char *)&tmp; in SYByteSwapShort() local
36 for (PetscCount i = 0; i < sizeof(short); i++) ptr2[i] = ptr1[sizeof(int) - 1 - i]; in SYByteSwapShort()
47 char *ptr1, *ptr2 = (char *)&tmp; in SYByteSwapScalar() local
53 for (PetscCount i = 0; i < sizeof(double); i++) ptr2[i] = ptr1[sizeof(double) - 1 - i]; in SYByteSwapScalar()
|
| /petsc/src/sys/objects/ftn-custom/ |
| H A D | zinheritf.c | 39 …rCode *), PetscCtx ctx, PetscErrorCode *ierr PETSC_F90_2PTR_PROTO(ptr1) PETSC_F90_2PTR_PROTO(ptr2)) in petscobjectaddoptionshandler_() argument
50 …tFortranCallback((PetscObject)*obj, PETSC_FORTRAN_CALLBACK_CLASS, &_cb.destroy_pgiptr, NULL, ptr2); in petscobjectaddoptionshandler_()
|
| /petsc/src/ksp/pc/impls/tfs/ |
| H A D | gs.c | 494 PetscInt *ptr1, *ptr2, i_start, negl, nel, *elms; in get_ngh_buf() local
563 for (ptr1 = ngh_buf, ptr2 = elms, end = gs->gl_min, or_ct = i = 0; or_ct < num_loads; or_ct++) { in get_ngh_buf()
568 for (start = end, end += per_load, i_start = i; (offset = *ptr2) < end; i++, ptr2++) { in get_ngh_buf()
577 ptr2 = (elms + i_start); in get_ngh_buf()
580 if (j == *ptr2) { in get_ngh_buf()
585 ptr2++; in get_ngh_buf()
600 *ptr2++ |= TOP_BIT; in get_ngh_buf()
608 ptr2++; in get_ngh_buf()
|
| /petsc/src/ts/trajectory/interface/ |
| H A D | traj.c | 770 const char *ptr = NULL, *ptr2 = NULL; in TSTrajectorySetFiletemplate() local
782 PetscCall(PetscStrchr(PetscInt_FMT "DiouxX", *ptr, (char **)&ptr2)); in TSTrajectorySetFiletemplate()
783 …PetscCheck(ptr2 || (*ptr >= '0' && *ptr <= '9'), PetscObjectComm((PetscObject)tj), PETSC_ERR_USER,… in TSTrajectorySetFiletemplate()
784 if (ptr2) break; in TSTrajectorySetFiletemplate()
|
| /petsc/src/ts/interface/ |
| H A D | tsmon.c | 970 const char *ptr = NULL, *ptr2 = NULL; in TSMonitorSolutionVTKCtxCreate() local
980 PetscCall(PetscStrchr("DdiouxX", *ptr, (char **)&ptr2)); in TSMonitorSolutionVTKCtxCreate()
981 …PetscCheck(ptr2 || (*ptr >= '0' && *ptr <= '9'), PETSC_COMM_SELF, PETSC_ERR_USER, "Invalid file te… in TSMonitorSolutionVTKCtxCreate()
982 if (ptr2) break; in TSMonitorSolutionVTKCtxCreate()
|
| /petsc/src/mat/impls/sbaij/mpi/ |
| H A D | mpisbaij.c | 1322 const PetscInt *ptr1, *ptr2; in ISEqual_private() local
1331 PetscCall(ISGetIndices(iscol_local, &ptr2)); in ISEqual_private()
1336 PetscCall(PetscArraycpy(a2, ptr2, sz2)); in ISEqual_private()
1352 PetscCall(ISRestoreIndices(iscol_local, &ptr2)); in ISEqual_private()
|