Home
last modified time | relevance | path

Searched refs:CFI_index_t (Results 1 – 4 of 4) sorted by relevance

/external/llvm-project/flang/unittests/Evaluate/
DISO-Fortran-binding.cpp71 const CFI_index_t *eAddr) { in DumpTestWorld()
84 CFI_rank_t rank, const CFI_index_t extents[]) { in check_CFI_establish()
157 CFI_index_t extents[CFI_MAX_RANK]; in run_CFI_establish_tests()
170 CFI_index_t *extentCases[]{extents, nullptr}; in run_CFI_establish_tests()
177 for (CFI_index_t *extent : extentCases) { in run_CFI_establish_tests()
202 const CFI_cdesc_t *dv, const CFI_index_t subscripts[]) { in check_CFI_address()
211 static void EstablishLowerBounds(CFI_cdesc_t *dv, CFI_index_t *sub) { in EstablishLowerBounds()
229 CFI_index_t extents[CFI_MAX_RANK]; in run_CFI_address_tests()
238 CFI_index_t subscripts[CFI_MAX_RANK]; in run_CFI_address_tests()
239 CFI_index_t negativeLowerBounds[CFI_MAX_RANK]; in run_CFI_address_tests()
[all …]
/external/llvm-project/flang/include/flang/
DISO_Fortran_binding.h36 typedef ptrdiff_t CFI_index_t; typedef
102 CFI_index_t lower_bound;
103 CFI_index_t extent; /* == -1 for assumed size */
104 CFI_index_t sm; /* memory stride in bytes */
164 void *CFI_address(const CFI_cdesc_t *, const CFI_index_t subscripts[]);
165 int CFI_allocate(CFI_cdesc_t *, const CFI_index_t lower_bounds[],
166 const CFI_index_t upper_bounds[], size_t elem_len);
169 size_t elem_len, CFI_rank_t, const CFI_index_t extents[]);
172 const CFI_index_t lower_bounds[], const CFI_index_t upper_bounds[],
173 const CFI_index_t strides[]);
[all …]
/external/llvm-project/flang/runtime/
DISO_Fortran_binding.cpp28 const CFI_cdesc_t *descriptor, const CFI_index_t subscripts[]) { in CFI_address()
38 int CFI_allocate(CFI_cdesc_t *descriptor, const CFI_index_t lower_bounds[], in CFI_allocate()
39 const CFI_index_t upper_bounds[], std::size_t elem_len) { in CFI_allocate()
72 CFI_index_t lb{lower_bounds[j]}; in CFI_allocate()
73 CFI_index_t ub{upper_bounds[j]}; in CFI_allocate()
74 CFI_index_t extent{ub >= lb ? ub - lb + 1 : 0}; in CFI_allocate()
217 CFI_rank_t rank, const CFI_index_t extents[]) { in CFI_establish()
264 CFI_index_t bytes = descriptor->elem_len; in CFI_is_contiguous()
275 const CFI_index_t lower_bounds[], const CFI_index_t upper_bounds[], in CFI_section()
276 const CFI_index_t strides[]) { in CFI_section()
[all …]
Ddescriptor.h37 using SubscriptValue = ISO::CFI_index_t;