#include <errno.h>
#include <foreign.h>
#include <fortran.h>
#include <liberrno.h>
#include "fio.h"
Go to the source code of this file.
Define Documentation
#define UNIT_DONE (-1.0) /* Operation completed */ |
Function Documentation
_f_real _UNIT_ |
( |
_f_int * |
unump | ) |
|
Definition at line 88 of file unit.c.
References _ferr(), _imp_open(), cup, FEMIXAUX, FFC_REC, FFCNT, FFSTAT, FS_AUX, FS_FDC, NULL, PARTIAL, SEQ, STMT_BEGIN, STMT_END, ffsw::sw_error, T_UNIT, unit_s::uend, unit_s::uerr, unit_s::uffsw, unit_s::uflagword, unit_s::ufs, UNF, UNIT_DONE, UNIT_EOF, UNIT_ERROR, UNIT_PDONE, unit_s::unitchk, unit_s::urecmode, unit_s::uwrt, and WAITIO.