Open64 (mfef90, whirl2f, and IR tools)  TAG: version-openad; SVN changeset: 916
read.c File Reference
#include <errno.h>
#include <foreign.h>
#include <fortran.h>
#include <liberrno.h>
#include <cray/dopevec.h>
#include "fio.h"
Include dependency graph for read.c:

Go to the source code of this file.

Defines

#define ret_err(errnum)
#define UBC   5 /* argument number for optional ubc parameter */

Functions

static void __READ ()
void READP (_f_int *unump, _f_int *uda, _f_int *words, _f_int *status, _f_int *ubc)
_f_int READ (_f_int *unump, _f_int *uda, _f_int *words, _f_int *status, _f_int *ubc)
static void __READ (int fulp, _f_int *unump, _f_int *uda, _f_int *words, _f_int *status, _f_int *ubc)

Define Documentation

#define ret_err (   errnum)
Value:
{       \
        *words  = 0;            \
        *status = errnum;       \
        goto done;              \
}

Definition at line 51 of file read.c.

Referenced by __READ().

#define UBC   5 /* argument number for optional ubc parameter */

Definition at line 57 of file read.c.

Referenced by READ(), and READP().


Function Documentation

static void __READ ( ) [static]

Referenced by READ(), and READP().

_f_int READ ( _f_int *  unump,
_f_int *  uda,
_f_int *  words,
_f_int *  status,
_f_int *  ubc 
)

Definition at line 91 of file read.c.

References __READ(), FULL, and UBC.

Referenced by __OPN().

Here is the call graph for this function:

void READP ( _f_int *  unump,
_f_int *  uda,
_f_int *  words,
_f_int *  status,
_f_int *  ubc 
)

Definition at line 67 of file read.c.

References __READ(), PARTIAL, and UBC.

Here is the call graph for this function:

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines