Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
Go to the source code of this file.
Defines | |
#define | BLANK ((int) ' ') |
#define | COMMA ((int) ',') |
#define | DQUOTE ((int) '"') |
#define | LPAREN ((int) '(') |
#define | MINUS ((int) '-') |
#define | PERIOD ((int) '.') |
#define | PLUS ((int) '+') |
#define | RPAREN ((int) ')') |
#define | SLASH ((int) '/') |
#define | SQUOTE ((int) '\'') |
#define | STAR ((int) '*') |
#define | ZERO ((int) '0') |
#define | BIT1 1LL |
#define | DIGITS |
#define | SPACES |
#define | SEPS |
#define | DELIMS |
#define | STRDLM |
#define | OUT_OF_RANGE(item) ((item) & ~077) |
#define | IN_SET(set, item) (OUT_OF_RANGE(item) ? 0 : (((set) >> (item)) & 1)) |
#define | IS_WHITESPACE(x) IN_SET(SPACES, (int) (x)) |
#define | IS_DIGIT(x) IN_SET(DIGITS, (int) (x)) |
#define | IS_SEPARATOR(x) IN_SET( SEPS, (int) (x)) |
#define | IS_DELIMITER(x) IN_SET(DELIMS, (int) (x)) |
#define | IS_STRING_DELIMITER(x) IN_SET(STRDLM, (int) (x)) |
#define | WOCTWRD 22 |
#define | WOCTHWD 11 |
#define | WINT 21 /* field width large enough for -2**64 */ |
#define | DREAL4_IEEE 9 /* 4-byte IEEE REAL */ |
#define | DREAL8_IEEE 17 /* 8-byte IEEE REAL */ |
#define | DREAL16_IEEE 36 /* 16-byte IEEE REAL */ |
#define | DREAL16_DD 34 /* 16-byte IEEE double double REAL */ |
#define | DREAL4_P_IEEE 6 /* 4-byte IEEE REAL partial precision */ |
#define | DREAL8_P_IEEE 15 /* 8-byte IEEE REAL partial precision */ |
#define | DREAL16_P_IEEE 33 /* 16-byte IEEE REAL partial precision */ |
#define | DREAL16_P_DD 31 /* 16-byte double double partial precision */ |
#define | DREAL8_CRI 16 /* 8-byte CRAY REAL */ |
#define | DREAL16_CRI 30 /* 16-byte CRAY REAL */ |
#define | DREAL8_P_CRI 14 /* 8-byte CRAY REAL partial precision */ |
#define | DREAL16_P_CRI 28 /* 16-byte CRAY REAL partial precision */ |
#define | DREAL8 DREAL8_CRI |
#define | DREAL16 DREAL16_CRI |
#define | DREAL8_P DREAL8_P_CRI |
#define | DREAL16_P DREAL16_P_CRI |
#define | DEXP8 4 /* Maximum digits in exponent */ |
#define | DEXP16 4 /* Maximum digits in exponent */ |
#define | DREAL8_YMP80 13 /* 8-byte CRAY REAL (partial precision) */ |
#define | DREAL16_YMP80 29 /* 16-byte CRAY REAL (partial precision) */ |
#define | WREAL8 (DREAL8+DEXP8+5) |
#define | WREAL16 (DREAL16+DEXP16+5) |
#define | ITEMBUFSIZ (WINT + 1 + 2*WREAL16 + 3 + 10) |
Variables | |
int | _dreal8 |
int | _dreal16 |
#define DEXP16 4 /* Maximum digits in exponent */ |
#define DEXP8 4 /* Maximum digits in exponent */ |
#define DIGITS |
#define DQUOTE ((int) '"') |
Definition at line 45 of file lio.h.
Referenced by _ld_write().
#define DREAL16 DREAL16_CRI |
Definition at line 199 of file lio.h.
Referenced by _lwrite_setup(), and _wf_setup().
#define DREAL16_CRI 30 /* 16-byte CRAY REAL */ |
#define DREAL16_DD 34 /* 16-byte IEEE double double REAL */ |
#define DREAL16_IEEE 36 /* 16-byte IEEE REAL */ |
#define DREAL16_P DREAL16_P_CRI |
Definition at line 201 of file lio.h.
Referenced by _lwrite_setup(), and _wf_setup().
#define DREAL16_P_CRI 28 /* 16-byte CRAY REAL partial precision */ |
#define DREAL16_P_DD 31 /* 16-byte double double partial precision */ |
#define DREAL16_P_IEEE 33 /* 16-byte IEEE REAL partial precision */ |
#define DREAL16_YMP80 29 /* 16-byte CRAY REAL (partial precision) */ |
Definition at line 207 of file lio.h.
Referenced by _lwrite_setup().
#define DREAL4_IEEE 9 /* 4-byte IEEE REAL */ |
#define DREAL4_P_IEEE 6 /* 4-byte IEEE REAL partial precision */ |
#define DREAL8 DREAL8_CRI |
Definition at line 198 of file lio.h.
Referenced by _lwrite_setup(), and _wf_setup().
#define DREAL8_CRI 16 /* 8-byte CRAY REAL */ |
#define DREAL8_IEEE 17 /* 8-byte IEEE REAL */ |
#define DREAL8_P DREAL8_P_CRI |
Definition at line 200 of file lio.h.
Referenced by _lwrite_setup(), and _wf_setup().
#define DREAL8_P_CRI 14 /* 8-byte CRAY REAL partial precision */ |
#define DREAL8_P_IEEE 15 /* 8-byte IEEE REAL partial precision */ |
#define DREAL8_YMP80 13 /* 8-byte CRAY REAL (partial precision) */ |
Definition at line 206 of file lio.h.
Referenced by _lwrite_setup().
#define IN_SET | ( | set, | |
item | |||
) | (OUT_OF_RANGE(item) ? 0 : (((set) >> (item)) & 1)) |
#define IS_DELIMITER | ( | x | ) | IN_SET(DELIMS, (int) (x)) |
Definition at line 137 of file lio.h.
Referenced by _get_value(), and _s_scan_extensions().
Definition at line 135 of file lio.h.
Referenced by _get_repcount(), _ld_read(), nonzero_integer(), process_arl(), process_bioz(), process_defg(), process_minus(), and process_paren_group().
#define IS_SEPARATOR | ( | x | ) | IN_SET( SEPS, (int) (x)) |
Definition at line 136 of file lio.h.
Referenced by _ld_read(), _mr_scan_char(), and _s_scan_extensions().
#define IS_STRING_DELIMITER | ( | x | ) | IN_SET(STRDLM, (int) (x)) |
Definition at line 138 of file lio.h.
Referenced by _mr_scan_char().
#define IS_WHITESPACE | ( | x | ) | IN_SET(SPACES, (int) (x)) |
Definition at line 134 of file lio.h.
Referenced by _mr_scan_complex().
#define ITEMBUFSIZ (WINT + 1 + 2*WREAL16 + 3 + 10) |
Definition at line 228 of file lio.h.
Referenced by _ld_write(), and l_write().
#define OUT_OF_RANGE | ( | item | ) | ((item) & ~077) |
#define PERIOD ((int) '.') |
Definition at line 48 of file lio.h.
Referenced by _beautify().
#define SEPS |
#define SPACES |
#define SQUOTE ((int) '\'') |
Definition at line 52 of file lio.h.
Referenced by _ld_write(), and _s_scan_extensions().
#define WINT 21 /* field width large enough for -2**64 */ |
Definition at line 146 of file lio.h.
Referenced by _ld_write(), l_write(), and writ_rep().
#define WOCTHWD 11 |
Definition at line 145 of file lio.h.
Referenced by _ld_write().
#define WOCTWRD 22 |
Definition at line 144 of file lio.h.
Referenced by _ld_write(), and l_write().
Definition at line 219 of file lio.h.
Referenced by _ld_write(), and l_write().
Definition at line 218 of file lio.h.
Referenced by _ld_write(), and l_write().
int _dreal16 |
Definition at line 76 of file globals.c.
Referenced by _ld_write(), _lwrite_setup(), and l_write().
int _dreal8 |
Definition at line 75 of file globals.c.
Referenced by _ld_write(), _lwrite_setup(), and l_write().