#include <fortran.h>#include <string.h>
Go to the source code of this file.
Defines | |
| #define | WORDS 4 |
| #define | BITS 63 |
| #define | MASK 03 |
| #define | SHIFT 2 |
| #define | FOUND(a) (mask[a & MASK] << (a >> SHIFT)) < 0 |
Functions | |
| _f_int | _SCAN (_fcd str1, _fcd str2, _f_log *back) |
| #define FOUND | ( | a | ) | (mask[a & MASK] << (a >> SHIFT)) < 0 |
Definition at line 81 of file scan.c.
Referenced by _SCAN(), check_and_allocate_common_storage(), check_section_open_mp_context(), find_prog_unit_tbl(), init_whole_array(), namelist_resolution(), ntr_boolean_const_tbl(), ntr_boz_const_tbl(), ntr_const_tbl(), process_variable_size_func(), resolve_attr(), and transform_cri_ch_ptr().
1.7.1