Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
#include <stddef.h>
#include <liberrno.h>
#include <cray/dopevec.h>
#include <cray/portdefs.h>
#include "arraydefs.h"
Go to the source code of this file.
Functions | |
void | _CSHIFT (DopeVectorType *result, DopeVectorType *source, DopeVectorType *shift, _f_int *dimp) |
void _CSHIFT | ( | DopeVectorType * | result, |
DopeVectorType * | source, | ||
DopeVectorType * | shift, | ||
_f_int * | dimp | ||
) |
Definition at line 59 of file cshift.c.
References _cptofcd(), _fcdlen(), _fcdtocp(), _LELVL_ABORT, _lerror(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, BITS_PER_BYTE, BITS_PER_WORD, BYTES_PER_WORD, DopeVector::charptr, DopeVector::dimension, DVSUBTYPE_BIT128, DVSUBTYPE_BIT256, DVSUBTYPE_BIT32, DVSUBTYPE_BIT64, DVSUBTYPE_CHAR, DVSUBTYPE_DERIVED, DopeVector::DvDimen::extent, FEINTDTY, FENOMEMY, FESCIDIM, if(), f90_type::int_len, DopeVector::DvDimen::low_bound, MAXDIM, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, restrict, DopeVector::DvDimen::stride_mult, f90_type::type, and DopeVector::type_lens.