Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
#include <signal.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <sys/stat.h>
#include <cray/mtlock.h>
#include "fio.h"
Go to the source code of this file.
Functions | |
void | _lwrite_setup (void) |
void | _wf_setup (void) |
void | _fcleanup (void) |
static void | _f_sig (int) |
void | _aborthandle (void) |
void | _initialize_fortran_io (void) |
void | _initialize_e_fortran_io (void) |
void | _initialize_i_fortran_io (void) |
Variables | |
char * | sys_siglist [] |
int | __fdctrace_enable |
short | _fortran_io_is_init |
short | _e_fortran_io_is_init |
short | _i_fortran_io_is_init |
short | _f_abort |
void _aborthandle | ( | void | ) |
static void _f_sig | ( | int | ) | [static] |
void _fcleanup | ( | void | ) |
Definition at line 62 of file fcleanup.c.
void _initialize_e_fortran_io | ( | void | ) |
Definition at line 199 of file finit.c.
References __fdctrace_enable, _e_fortran_io_is_init, _fcleanup(), _fortran_io_is_init, _initialize_fortran_io(), atabort, atexit(), getenv(), and NULL.
Referenced by _alloc_unit().
void _initialize_fortran_io | ( | void | ) |
Definition at line 146 of file finit.c.
References _f_rcsz, _fortran_io_is_init, _lwrite_setup(), _wf_setup(), LOADED, and LOADED_DATA.
Referenced by _initialize_e_fortran_io(), and _initialize_i_fortran_io().
void _initialize_i_fortran_io | ( | void | ) |
Definition at line 237 of file finit.c.
References _fortran_io_is_init, _i_fortran_io_is_init, and _initialize_fortran_io().
Referenced by _init_internal_unit().
void _lwrite_setup | ( | void | ) |
Definition at line 1318 of file lwrite.c.
References _90_char_nonchar_delim_blanks, _blank_at_start_of_empty_rec, _dreal16, _dreal8, _old_list_out_repcounts, DREAL16, DREAL16_P, DREAL16_YMP80, DREAL8, DREAL8_P, DREAL8_YMP80, getenv(), and NULL.
Referenced by _initialize_fortran_io().
void _wf_setup | ( | void | ) |
Definition at line 1141 of file wf.c.
References _CRAYLIBS_RELEASE, _newrec_listio_after_nonadvancing, _RCHK, _RCHK77, _RCHK90, _RNOCHK, _rw_mxdgt, _WCHK, _WCHK77, _WCHK90, _WNOCHK, D_ED, DREAL16, DREAL16_P, DREAL8, DREAL8_P, G_ED, getenv(), and NULL.
Referenced by _initialize_fortran_io().
Referenced by _initialize_e_fortran_io().
short _e_fortran_io_is_init |
Definition at line 128 of file finit.c.
Referenced by _alloc_unit(), and _initialize_e_fortran_io().
short _f_abort |
Definition at line 130 of file finit.c.
Referenced by _unit_close().
short _fortran_io_is_init |
Definition at line 127 of file finit.c.
Referenced by _initialize_e_fortran_io(), _initialize_fortran_io(), and _initialize_i_fortran_io().
short _i_fortran_io_is_init |
Definition at line 129 of file finit.c.
Referenced by _init_internal_unit(), and _initialize_i_fortran_io().
char* sys_siglist[] |
Referenced by StrSignal().