Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
#include <liberrno.h>
#include <fortran.h>
#include <string.h>
#include <cray/nassert.h>
#include "fio.h"
#include "f90io.h"
Go to the source code of this file.
Functions | |
_INQ (_f_int *unitn, _f_int *iostat, int errf, _f_log *exist, _f_log *opened, _f_int *number, _f_log *named, _fcd name, _fcd access, _fcd sequent, _fcd direct, _fcd form, _fcd formatt, _fcd unform, _f_int *recl, _f_int *nextrec, _fcd blank, _fcd file, _fcd pos, _fcd action, _fcd red, _fcd writ, _fcd redwrit, _fcd delim, _fcd pad) | |
int | _INQUIRE (struct inquire_spec_list *i) |
_INQ | ( | _f_int * | unitn, |
_f_int * | iostat, | ||
int | errf, | ||
_f_log * | exist, | ||
_f_log * | opened, | ||
_f_int * | number, | ||
_f_log * | named, | ||
_fcd | name, | ||
_fcd | access, | ||
_fcd | sequent, | ||
_fcd | direct, | ||
_fcd | form, | ||
_fcd | formatt, | ||
_fcd | unform, | ||
_f_int * | recl, | ||
_f_int * | nextrec, | ||
_fcd | blank, | ||
_fcd | file, | ||
_fcd | pos, | ||
_fcd | action, | ||
_fcd | red, | ||
_fcd | writ, | ||
_fcd | redwrit, | ||
_fcd | delim, | ||
_fcd | pad | ||
) |
Definition at line 68 of file inq.c.
References _f_inqu(), _fcdlen(), _fcdtocp(), access, blank, CFT77_RETVAL, cup, delim, error(), inlist::inacc, inlist::inacclen, inlist::inaction, inlist::inactonlen, inlist::inblank, inlist::inblanklen, inlist::indelim, inlist::indelimlen, inlist::indir, inlist::indirlen, inlist::inerr, inlist::inex, inlist::infile, inlist::infilen, inlist::infmt, inlist::infmtlen, inlist::inform, inlist::informlen, inlist::inname, inlist::innamed, inlist::innamlen, inlist::innrec, inlist::innum, inlist::inopen, inlist::inpad, inlist::inpadlen, inlist::inposit, inlist::inpositlen, inlist::inrdwrtlen, inlist::inread, inlist::inreadlen, inlist::inrecl, inlist::inredwrit, inlist::inseq, inlist::inseqlen, inlist::inunf, inlist::inunflen, inlist::inunit, inlist::inwrite, inlist::inwritelen, IO_ERR, IO_OKAY, name, NULL, STMT_BEGIN, STMT_END, T_INQF, and T_INQU.
Referenced by _INQUIRE().
int _INQUIRE | ( | struct inquire_spec_list * | i | ) |
Definition at line 285 of file inq.c.
References _INQ(), inquire_spec_list::access, inquire_spec_list::action, inquire_spec_list::blank, inquire_spec_list::delim, inquire_spec_list::direct, inquire_spec_list::err, inquire_spec_list::exist, inquire_spec_list::file, inquire_spec_list::form, inquire_spec_list::formatted, inquire_spec_list::iostat, inquire_spec_list::name, inquire_spec_list::named, inquire_spec_list::nextrec, inquire_spec_list::number, inquire_spec_list::opened, inquire_spec_list::pad, inquire_spec_list::position, inquire_spec_list::read, inquire_spec_list::readwrite, inquire_spec_list::recl, inquire_spec_list::sequential, inquire_spec_list::unformatted, inquire_spec_list::unit, inquire_spec_list::version, and inquire_spec_list::write.