osprey/kgccfe/gnu/f/com.h File Reference

#include "com-rt.def"
#include "tree.h"
#include "bld.h"
#include "info.h"
#include "lab.h"
#include "storag.h"
#include "symbol.h"

Include dependency graph for com.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Data Types

type  _ffecom_symbol_

Defines

#define FFECOM_dimensionsMAX   7
#define FFECOM_SIZE_UNIT   "byte"
#define FFECOM_SIZE_UNITS   "bytes"
#define FFECOM_constantNULL   NULL_TREE
#define FFECOM_nonterNULL   NULL_TREE
#define FFECOM_globalNULL   NULL_TREE
#define FFECOM_labelNULL   NULL_TREE
#define FFECOM_storageNULL   NULL_TREE
#define FFECOM_symbolNULL   ffecom_symbol_null_
#define FFECOM_f2ccodeCHAR   1
#define FFECOM_f2ccodeSHORT   2
#define FFECOM_f2ccodeINT   3
#define FFECOM_f2ccodeLONG   4
#define FFECOM_f2ccodeLONGLONG   5
#define FFECOM_f2ccodeCHARPTR   6
#define FFECOM_f2ccodeFLOAT   7
#define FFECOM_f2ccodeDOUBLE   8
#define FFECOM_f2ccodeLONGDOUBLE   9
#define FFECOM_f2ccodeTWOREALS   10
#define FFECOM_f2ccodeTWODOUBLEREALS   11
#define DEFGFRT(CODE, NAME, TYPE, ARGS, VOLATILE, COMPLEX, CONST)   CODE,
#define FFECOM_constantHOOK
#define FFECOM_nonterHOOK
#define FFECOM_globalHOOK
#define FFECOM_labelHOOK
#define FFECOM_storageHOOK
#define FFECOM_symbolHOOK
#define ffecom_f2c_typecode(bt, kt)   ffecom_f2c_typecode_[(bt)][(kt)]
#define ffecom_label_kind()   ffecom_label_kind_
#define ffecom_pointer_kind()   ffecom_pointer_kind_
#define ffecom_prepare_expr(e)   ffecom_prepare_expr_ ((e), NULL)
#define ffecom_init_1()
#define ffecom_init_3()
#define ffecom_init_4()
#define ffecom_terminate_0()
#define ffecom_terminate_1()
#define ffecom_terminate_2()
#define ffecom_terminate_3()
#define ffecom_terminate_4()

Typedefs

typedef tree ffecomConstant
typedef tree ffecomNonter
typedef tree ffecomLabel
typedef tree ffecomGlobal
typedef tree ffecomStorage
typedef struct _ffecom_symbol_ ffecomSymbol

Enumerations

enum  ffecomGfrt { DEFGFRT }

Functions/Subroutines

tree ffecom_1 (enum tree_code code, tree type, tree node)
tree ffecom_1_fn (tree node)
tree ffecom_2 (enum tree_code code, tree type, tree node1, tree node2)
bool ffecom_2pass_advise_entrypoint (ffesymbol entry)
void ffecom_2pass_do_entrypoint (ffesymbol entry)
tree ffecom_2s (enum tree_code code, tree type, tree node1, tree node2)
tree ffecom_3 (enum tree_code code, tree type, tree node1, tree node2, tree node3)
tree ffecom_3s (enum tree_code code, tree type, tree node1, tree node2, tree node3)
tree ffecom_arg_expr (ffebld expr, tree *length)
tree ffecom_arg_ptr_to_const_expr (ffebld expr, tree *length)
tree ffecom_arg_ptr_to_expr (ffebld expr, tree *length)
tree ffecom_call_gfrt (ffecomGfrt ix, tree args, tree hook)
tree ffecom_constantunion (ffebldConstantUnion *cu, ffeinfoBasictype bt, ffeinfoKindtype kt, tree tree_type)
tree ffecom_const_expr (ffebld expr)
tree ffecom_decl_field (tree context, tree prevfield, const char *name, tree type)
void ffecom_close_include (FILE *f)
int ffecom_decode_include_option (char *spec)
tree ffecom_end_compstmt (void)
void ffecom_end_transition (void)
void ffecom_exec_transition (void)
void ffecom_expand_let_stmt (ffebld dest, ffebld source)
tree ffecom_expr (ffebld expr)
tree ffecom_expr_assign (ffebld expr)
tree ffecom_expr_assign_w (ffebld expr)
tree ffecom_expr_rw (tree type, ffebld expr)
tree ffecom_expr_w (tree type, ffebld expr)
void ffecom_finish_compile (void)
void ffecom_finish_decl (tree decl, tree init, bool is_top_level)
void ffecom_finish_progunit (void)
tree ffecom_get_invented_identifier (const char *pattern,...) ATTRIBUTE_PRINTF_1
ffeinfoKindtype ffecom_gfrt_basictype (ffecomGfrt ix)
ffeinfoKindtype ffecom_gfrt_kindtype (ffecomGfrt ix)
void ffecom_init_0 (void)
void ffecom_init_2 (void)
tree ffecom_list_expr (ffebld list)
tree ffecom_list_ptr_to_expr (ffebld list)
tree ffecom_lookup_label (ffelab label)
tree ffecom_make_tempvar (const char *commentary, tree type, ffetargetCharacterSize size, int elements)
tree ffecom_modify (tree newtype, tree lhs, tree rhs)
void ffecom_save_tree_forever (tree t)
void ffecom_file (const char *name)
void ffecom_notify_init_storage (ffestorag st)
void ffecom_notify_init_symbol (ffesymbol s)
void ffecom_notify_primary_entry (ffesymbol fn)
FILE * ffecom_open_include (char *name, ffewhereLine l, ffewhereColumn c)
void ffecom_prepare_arg_ptr_to_expr (ffebld expr)
bool ffecom_prepare_end (void)
void ffecom_prepare_expr_ (ffebld expr, ffebld dest)
void ffecom_prepare_expr_rw (tree type, ffebld expr)
void ffecom_prepare_expr_w (tree type, ffebld expr)
void ffecom_prepare_ptr_to_expr (ffebld expr)
void ffecom_prepare_return_expr (ffebld expr)
tree ffecom_ptr_to_const_expr (ffebld expr)
tree ffecom_ptr_to_expr (ffebld expr)
tree ffecom_return_expr (ffebld expr)
tree ffecom_save_tree (tree t)
void ffecom_start_compstmt (void)
tree ffecom_start_decl (tree decl, bool is_init)
void ffecom_sym_commit (ffesymbol s)
ffesymbol ffecom_sym_end_transition (ffesymbol s)
ffesymbol ffecom_sym_exec_transition (ffesymbol s)
ffesymbol ffecom_sym_learned (ffesymbol s)
void ffecom_sym_retract (ffesymbol s)
tree ffecom_temp_label (void)
tree ffecom_truth_value (tree expr)
tree ffecom_truth_value_invert (tree expr)
tree ffecom_type_expr (ffebld expr)
tree ffecom_which_entrypoint_decl (void)

Variables

tree string_type_node
tree ffecom_integer_type_node
tree ffecom_integer_zero_node
tree ffecom_integer_one_node
tree ffecom_tree_type [FFEINFO_basictype][FFEINFO_kindtype]
ffecomSymbol ffecom_symbol_null_
ffeinfoKindtype ffecom_pointer_kind_
ffeinfoKindtype ffecom_label_kind_
int ffecom_f2c_typecode_ [FFEINFO_basictype][FFEINFO_kindtype]
tree ffecom_f2c_integer_type_node
tree ffecom_f2c_address_type_node
tree ffecom_f2c_real_type_node
tree ffecom_f2c_doublereal_type_node
tree ffecom_f2c_complex_type_node
tree ffecom_f2c_doublecomplex_type_node
tree ffecom_f2c_longint_type_node
tree ffecom_f2c_logical_type_node
tree ffecom_f2c_flag_type_node
tree ffecom_f2c_ftnlen_type_node
tree ffecom_f2c_ftnlen_zero_node
tree ffecom_f2c_ftnlen_one_node
tree ffecom_f2c_ftnlen_two_node
tree ffecom_f2c_ptr_to_ftnlen_type_node
tree ffecom_f2c_ftnint_type_node
tree ffecom_f2c_ptr_to_ftnint_type_node

Define Documentation

#define DEFGFRT ( CODE,
NAME,
TYPE,
ARGS,
VOLATILE,
COMPLEX,
CONST   )     CODE,

#define FFECOM_constantHOOK

Definition at line 131 of file com.h.

#define FFECOM_constantNULL   NULL_TREE

Definition at line 40 of file com.h.

Referenced by ffebld_constant_new_character1_val(), ffebld_constant_new_complex1_val(), ffebld_constant_new_complex2_val(), ffebld_constant_new_hollerith_val(), ffebld_constant_new_integer1_val(), ffebld_constant_new_integer2_val(), ffebld_constant_new_integer3_val(), ffebld_constant_new_integer4_val(), ffebld_constant_new_logical1_val(), ffebld_constant_new_logical2_val(), ffebld_constant_new_logical3_val(), ffebld_constant_new_logical4_val(), ffebld_constant_new_real1_val(), ffebld_constant_new_real2_val(), and ffebld_constant_new_typeless_val().

#define FFECOM_dimensionsMAX   7

Definition at line 35 of file com.h.

Referenced by ffecom_arrayref_(), and ffestb_subr_dimlist_().

#define ffecom_f2c_typecode ( bt,
kt   )     ffecom_f2c_typecode_[(bt)][(kt)]

Definition at line 271 of file com.h.

Referenced by ffecom_vardesc_(), and ffeste_io_dolio_().

#define FFECOM_f2ccodeCHAR   1

Definition at line 51 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeCHARPTR   6

Definition at line 56 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeDOUBLE   8

Definition at line 58 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeFLOAT   7

Definition at line 57 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeINT   3

Definition at line 53 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeLONG   4

Definition at line 54 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeLONGDOUBLE   9

Definition at line 59 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeLONGLONG   5

Definition at line 55 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeSHORT   2

Definition at line 52 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeTWODOUBLEREALS   11

Definition at line 61 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_f2ccodeTWOREALS   10

Definition at line 60 of file com.h.

Referenced by ffecom_f2c_make_type_().

#define FFECOM_globalHOOK

Definition at line 135 of file com.h.

#define FFECOM_globalNULL   NULL_TREE

Definition at line 42 of file com.h.

Referenced by ffeglobal_new_(), and ffeglobal_ref_progunit_().

 
#define ffecom_init_1 (  ) 

Definition at line 276 of file com.h.

Referenced by ffe_init_1().

 
#define ffecom_init_3 (  ) 

Definition at line 277 of file com.h.

Referenced by ffe_init_3().

 
#define ffecom_init_4 (  ) 

Definition at line 278 of file com.h.

Referenced by ffe_init_4().

 
#define ffecom_label_kind (  )     ffecom_label_kind_

Definition at line 272 of file com.h.

Referenced by ffeexpr_finished_().

#define FFECOM_labelHOOK

Definition at line 137 of file com.h.

#define FFECOM_labelNULL   NULL_TREE

Definition at line 43 of file com.h.

Referenced by ffelab_new().

#define FFECOM_nonterHOOK

Definition at line 133 of file com.h.

#define FFECOM_nonterNULL   NULL_TREE

Definition at line 41 of file com.h.

Referenced by ffebld_new_one(), and ffebld_new_two().

 
#define ffecom_pointer_kind (  )     ffecom_pointer_kind_

Definition at line 273 of file com.h.

Referenced by ffeexpr_cb_end_loc_(), and ffeintrin_check_().

#define ffecom_prepare_expr ( e   )     ffecom_prepare_expr_ ((e), NULL)

Definition at line 274 of file com.h.

Referenced by ffecom_gen_sfuncdef_(), ffecom_prepare_arg_ptr_to_expr(), ffecom_prepare_expr_(), ffecom_prepare_expr_rw(), ffecom_prepare_expr_w(), ffecom_prepare_ptr_to_expr(), ffecom_prepare_return_expr(), ffeste_begin_iterdo_(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), ffeste_io_olist_(), ffeste_R1212(), ffeste_R803(), ffeste_R804(), ffeste_R807(), ffeste_R809(), ffeste_R819B(), ffeste_R837(), and ffeste_R840().

#define FFECOM_SIZE_UNIT   "byte"

Definition at line 37 of file com.h.

Referenced by ffeglobal_pad_common(), ffeglobal_size_common(), and ffestorag_exec_layout().

#define FFECOM_SIZE_UNITS   "bytes"

Definition at line 38 of file com.h.

Referenced by ffeglobal_pad_common(), ffeglobal_size_common(), and ffestorag_exec_layout().

#define FFECOM_storageHOOK

Definition at line 139 of file com.h.

Referenced by ffestorag_new().

#define FFECOM_storageNULL   NULL_TREE

Definition at line 44 of file com.h.

Referenced by ffestorag_new().

#define FFECOM_symbolHOOK

Definition at line 141 of file com.h.

#define FFECOM_symbolNULL   ffecom_symbol_null_

Definition at line 45 of file com.h.

Referenced by ffesymbol_new_().

 
#define ffecom_terminate_0 (  ) 

Definition at line 279 of file com.h.

Referenced by ffe_terminate_0().

 
#define ffecom_terminate_1 (  ) 

Definition at line 280 of file com.h.

Referenced by ffe_terminate_1().

 
#define ffecom_terminate_2 (  ) 

Definition at line 281 of file com.h.

Referenced by ffe_terminate_2().

 
#define ffecom_terminate_3 (  ) 

Definition at line 282 of file com.h.

Referenced by ffe_terminate_3().

 
#define ffecom_terminate_4 (  ) 

Definition at line 283 of file com.h.

Referenced by ffe_terminate_4().

Typedef Documentation

typedef tree ffecomConstant

Definition at line 130 of file com.h.

typedef tree ffecomGlobal

Definition at line 136 of file com.h.

typedef tree ffecomLabel

Definition at line 134 of file com.h.

typedef tree ffecomNonter

Definition at line 132 of file com.h.

typedef tree ffecomStorage

Definition at line 138 of file com.h.

typedef struct _ffecom_symbol_ ffecomSymbol

Definition at line 140 of file com.h.

Enumeration Type Documentation

enum ffecomGfrt

Enumerator:
DEFGFRT 

Definition at line 116 of file com.h.

Function Documentation

tree ffecom_1 ( enum tree_code  code,
tree  type,
tree  node 
)

Definition at line 9516 of file com.c.

References assert, build(), build1, error_mark_node, ffe_is_emulate_complex, ffecom_1(), ffecom_2(), ffecom_stabilize_aggregate_(), fold(), mark_addressable(), NULL, staticp, TREE_CHAIN, TREE_CODE, TREE_CONSTANT, TREE_READONLY, TREE_SIDE_EFFECTS, TREE_TYPE, TYPE_FIELDS, and TYPE_READONLY.

Referenced by convert(), ffecom_1(), ffecom_2(), ffecom_arg_ptr_to_expr(), ffecom_arglist_expr_(), ffecom_arrayref_(), ffecom_call_(), ffecom_char_args_x_(), ffecom_convert_to_complex_(), ffecom_do_entry_(), ffecom_end_transition(), ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_expr_power_integer_(), ffecom_gfrt_tree_(), ffecom_intrinsic_ichar_(), ffecom_let_char_(), ffecom_ptr_to_expr(), ffecom_subscript_check_(), ffecom_sym_transform_(), ffecom_transform_namelist_(), ffecom_tree_divide_(), ffecom_vardesc_(), ffecom_vardesc_dims_(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_dofio_(), ffeste_io_dolio_(), ffeste_io_douio_(), ffeste_io_ialist_(), ffeste_io_icilist_(), ffeste_io_inlist_(), ffeste_io_olist_(), ffeste_R838(), and truthvalue_conversion().

tree ffecom_1_fn ( tree  node  ) 

Definition at line 9582 of file com.c.

References build1, build_pointer_type(), build_type_variant, error_mark_node, fold(), staticp, TREE_CONSTANT, TREE_READONLY, TREE_SIDE_EFFECTS, TREE_THIS_VOLATILE, and TREE_TYPE.

Referenced by ffecom_char_args_x_(), ffecom_do_entry_(), and ffecom_expr_().

tree ffecom_2 ( enum tree_code  code,
tree  type,
tree  node1,
tree  node2 
)

Definition at line 9606 of file com.c.

References a, assert, b, build(), build_tree_list, c, d, error_mark_node, ffe_is_emulate_complex, ffecom_1(), ffecom_2(), ffecom_stabilize_aggregate_(), fold(), NULL, NULL_TREE, save_expr(), TREE_CHAIN, TREE_CODE, TREE_SIDE_EFFECTS, TREE_TYPE, and TYPE_FIELDS.

Referenced by ffecom_1(), ffecom_2(), ffecom_arg_ptr_to_expr(), ffecom_arrayref_(), ffecom_call_(), ffecom_char_args_x_(), ffecom_convert_to_complex_(), ffecom_do_entry_(), ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_expr_power_integer_(), ffecom_intrinsic_ichar_(), ffecom_intrinsic_len_(), ffecom_let_char_(), ffecom_overlap_(), ffecom_subscript_check_(), ffecom_sym_transform_(), ffecom_tree_divide_(), ffecom_vardesc_dims_(), ffeste_begin_iterdo_(), ffeste_end_iterdo_(), ffeste_R840(), ffeste_R909_finish(), and truthvalue_conversion().

bool ffecom_2pass_advise_entrypoint ( ffesymbol  entry  ) 

Definition at line 9792 of file com.c.

References assert, FALSE, ffebad_finish(), ffebad_start, ffebld_head, ffebld_new_item(), ffebld_op, ffebld_set_trail, ffebld_symter, ffebld_trail, FFEINFO_kindtypeNONE, ffest_ffebad_here_current_stmt(), ffesymbol_basictype, ffesymbol_dummyargs, ffesymbol_kindtype, ffesymbol_size, NULL, ok(), s, size, and TRUE.

Referenced by ffestd_exec_begin(), and ffestd_R1226().

void ffecom_2pass_do_entrypoint ( ffesymbol  entry  ) 

Definition at line 9938 of file com.c.

References ffecom_do_entry_().

Referenced by ffestd_exec_end().

tree ffecom_2s ( enum tree_code  code,
tree  type,
tree  node1,
tree  node2 
)

Definition at line 9962 of file com.c.

References build(), error_mark_node, fold(), and TREE_SIDE_EFFECTS.

Referenced by ffecom_expand_let_stmt(), ffecom_expr_intrinsic_(), and ffecom_modify().

tree ffecom_3 ( enum tree_code  code,
tree  type,
tree  node1,
tree  node2,
tree  node3 
)

Definition at line 9981 of file com.c.

References build(), error_mark_node, fold(), NULL_TREE, and TREE_SIDE_EFFECTS.

Referenced by ffecom_expr_intrinsic_(), ffecom_intrinsic_ichar_(), ffecom_subscript_check_(), and ffecom_sym_transform_().

tree ffecom_3s ( enum tree_code  code,
tree  type,
tree  node1,
tree  node2,
tree  node3 
)

Definition at line 10004 of file com.c.

References build(), error_mark_node, fold(), and TREE_SIDE_EFFECTS.

Referenced by ffecom_call_(), ffecom_char_args_x_(), and ffecom_do_entry_().

tree ffecom_arg_expr ( ffebld  expr,
tree *  length 
)

Definition at line 10038 of file com.c.

References ffebld_info, ffecom_arg_ptr_to_expr(), ffecom_expr(), ffeinfo_basictype, integer_zero_node, NULL, and NULL_TREE.

Referenced by ffecom_arglist_expr_(), ffecom_call_binop_(), ffecom_expr_(), and ffecom_list_expr().

tree ffecom_arg_ptr_to_const_expr ( ffebld  expr,
tree *  length 
)

Definition at line 10064 of file com.c.

References assert, build_int_2, error_mark_node, ffebld_arity, ffebld_op, ffebld_size, ffebld_where, ffecom_arg_ptr_to_expr(), FFETARGET_charactersizeNONE, integer_zero_node, NULL_TREE, and TREE_CONSTANT.

Referenced by ffeste_io_cilist_(), and ffeste_io_icilist_().

tree ffecom_arg_ptr_to_expr ( ffebld  expr,
tree *  length 
)

Definition at line 10122 of file com.c.

References assert, build_int_2, build_pointer_type(), build_tree_list, char_type_node, convert(), count, error_mark_node, ffebld_constant_union, ffebld_conter, ffebld_cu_val_hollerith, ffebld_info, ffebld_left, ffebld_nonter_hook, ffebld_op, ffecom_1(), ffecom_2(), ffecom_arg_ptr_to_expr(), ffecom_call_gfrt(), ffecom_char_args_, ffecom_char_args_with_null_, ffecom_concat_list_count_, ffecom_concat_list_expr_, ffecom_concat_list_kill_(), ffecom_concat_list_maxlen_, ffecom_concat_list_new_(), ffecom_expr(), ffecom_f2c_address_type_node, ffecom_f2c_ftnlen_type_node, ffecom_f2c_ftnlen_zero_node, ffecom_f2c_ptr_to_ftnlen_type_node, ffecom_modify(), ffecom_ptr_to_expr(), ffecom_save_tree(), ffeinfo_basictype, ffeinfo_kindtype, FFEINFO_kindtypeCHARACTER1, FFETARGET_charactersizeNONE, h, i, integer_zero_node, _ffetarget_hollerith_::length, NULL, null_pointer_node, NULL_TREE, sz(), TREE_CHAIN, TREE_CODE, TREE_SIDE_EFFECTS, TREE_TYPE, TREE_VEC_ELT, TREE_VEC_LENGTH, TRUE, TYPE_MAIN_VARIANT, TYPE_SIZE, and void_type_node.

Referenced by ffecom_arg_expr(), ffecom_arg_ptr_to_const_expr(), ffecom_arg_ptr_to_expr(), ffecom_arglist_expr_(), ffecom_call_binop_(), ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_list_ptr_to_expr(), ffecom_vardesc_(), ffeste_io_cilist_(), ffeste_io_dofio_(), ffeste_io_dolio_(), ffeste_io_douio_(), and ffeste_io_icilist_().

tree ffecom_call_gfrt ( ffecomGfrt  ix,
tree  args,
tree  hook 
)

Definition at line 10371 of file com.c.

References ffe_is_f2c_library, ffecom_call_(), ffecom_gfrt_kindtype(), ffecom_gfrt_tree_(), NULL, NULL_TREE, and TRUE.

Referenced by ffecom_arg_ptr_to_expr(), ffecom_char_args_x_(), ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_let_char_(), ffecom_subscript_check_(), ffeste_io_dofio_(), ffeste_io_dolio_(), ffeste_io_douio_(), ffeste_R842(), ffeste_R843(), ffeste_R904(), ffeste_R907(), ffeste_R909_finish(), ffeste_R909_start(), ffeste_R910_finish(), ffeste_R910_start(), ffeste_R911_finish(), ffeste_R911_start(), ffeste_R923A(), and ffeste_subr_beru_().

void ffecom_close_include ( FILE *  f  ) 

Definition at line 10705 of file com.c.

References ffecom_close_include_().

Referenced by ffelex_include_().

tree ffecom_const_expr ( ffebld  expr  ) 

Definition at line 10659 of file com.c.

References assert, error_mark_node, ffebld_arity, ffebld_op, ffebld_where, ffecom_expr(), integer_zero_node, NULL_TREE, and TREE_CONSTANT.

Referenced by ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), and ffeste_io_olist_().

tree ffecom_constantunion ( ffebldConstantUnion *  cu,
ffeinfoBasictype  bt,
ffeinfoKindtype  kt,
tree  tree_type 
)

Definition at line 10383 of file com.c.

References assert, build_array_type(), build_int_2, build_range_type(), build_real(), build_string(), build_type_variant, char_type_node, CHAR_TYPE_SIZE, error(), error_mark_node, ffebld_cu_val_character1, ffebld_cu_val_complex1, ffebld_cu_val_complex2, ffebld_cu_val_complex3, ffebld_cu_val_complex4, ffebld_cu_val_hollerith, ffebld_cu_val_integer1, ffebld_cu_val_integer2, ffebld_cu_val_integer3, ffebld_cu_val_integer4, ffebld_cu_val_logical1, ffebld_cu_val_logical2, ffebld_cu_val_logical3, ffebld_cu_val_logical4, ffebld_cu_val_real1, ffebld_cu_val_real2, ffebld_cu_val_real3, ffebld_cu_val_real4, ffebld_cu_val_typeless, ffecom_build_complex_constant_(), ffecom_tree_type, FFEINFO_kindtypeANY, FFEINFO_kindtypeINTEGER1, FFEINFO_kindtypeINTEGER2, FFEINFO_kindtypeINTEGER3, FFEINFO_kindtypeINTEGER4, FFEINFO_kindtypeLOGICAL1, FFEINFO_kindtypeLOGICAL2, FFEINFO_kindtypeLOGICAL3, FFEINFO_kindtypeLOGICAL4, FFEINFO_kindtypeREAL1, FFEINFO_kindtypeREAL2, FFEINFO_kindtypeREAL3, FFEINFO_kindtypeREAL4, ffetarget_convert_integer1_typeless, ffetarget_length_character1, ffetarget_text_character1, ffetarget_value_real1, ffetarget_value_real2, FLOAT_TYPE_SIZE, h, integer_one_node, integer_type_node, _ffetarget_hollerith_::length, memcpy, memset, NULL, REAL_VALUE_TYPE, str, _ffetarget_hollerith_::text, TREE_CONSTANT, TREE_TYPE, and val.

Referenced by ffecom_expr_(), ffecom_ptr_to_expr(), and ffeste_R810().

tree ffecom_decl_field ( tree  context,
tree  prevfield,
const char *  name,
tree  type 
)

Definition at line 10689 of file com.c.

References build_decl, DECL_ALIGN, DECL_CONTEXT, DECL_USER_ALIGN, get_identifier(), NULL_TREE, and TREE_CHAIN.

Referenced by ffecom_make_complex_type_(), ffecom_type_namelist_(), ffecom_type_vardesc_(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), ffeste_io_icilist_(), ffeste_io_inlist_(), and ffeste_io_olist_().

int ffecom_decode_include_option ( char *  spec  ) 

Definition at line 10711 of file com.c.

References ffecom_decode_include_option_().

Referenced by ffe_decode_option().

tree ffecom_end_compstmt ( void   ) 

Definition at line 10719 of file com.c.

References bison_rule_compstmt_().

Referenced by ffecom_do_entry_(), ffecom_expr_power_integer_(), ffecom_finish_progunit(), and ffecom_gen_sfuncdef_().

void ffecom_end_transition ( void   ) 

Definition at line 10731 of file com.c.

References build_decl, build_pointer_type(), callee, DECL_EXTERNAL, DECL_INITIAL, dmpout, error_mark_node, FALSE, ffe_is_ffedebug, ffebld_head, ffebld_symter, ffebld_trail, ffecom_1(), ffecom_get_invented_identifier(), ffecom_start_progunit_(), ffecom_sym_end_transition(), ffecom_sym_transform_(), ffecom_transform_common_(), ffestorag_report(), ffesymbol_drive(), ffesymbol_hook, finish_decl(), fprintf(), NULL, NULL_TREE, s, start_decl(), TREE_PUBLIC, TREE_STATIC, TREE_TYPE, and TREE_USED.

Referenced by ffestd_exec_end().

void ffecom_exec_transition ( void   ) 

Definition at line 10807 of file com.c.

References dmpout, FALSE, ffe_is_ffedebug, ffebad_inhibit, ffebad_set_inhibit, ffecom_sym_exec_transition(), ffeequiv_exec_transition(), ffestorag_report(), ffesymbol_drive(), fprintf(), and TRUE.

Referenced by ffestd_exec_begin().

void ffecom_expand_let_stmt ( ffebld  dest,
ffebld  source 
)

Definition at line 10834 of file com.c.

References assert, assign_temp(), error_mark_node, expand_expr_stmt(), FALSE, ffebld_basictype, ffebld_info, ffebld_kindtype, ffebld_op, ffebld_size_known, ffebld_symter, ffecom_2s(), ffecom_char_args_, ffecom_expr(), ffecom_expr_(), ffecom_expr_w(), ffecom_let_char_(), ffecom_make_tempvar(), ffecom_possible_partial_overlap_(), ffecom_prepare_end(), ffecom_prepare_expr_(), ffecom_prepare_expr_w(), ffecom_prepare_let_char_(), ffecom_tree_type, ffeinfo_basictype, ffesymbol_hook, FFETARGET_charactersizeNONE, NULL, NULL_TREE, TREE_ADDRESSABLE, TREE_CODE, TRUE, and void_type_node.

Referenced by ffeste_R737A().

tree ffecom_expr ( ffebld  expr  ) 

Definition at line 10952 of file com.c.

References FALSE, ffecom_expr_(), NULL, and NULL_TREE.

Referenced by ffecom_arg_expr(), ffecom_arg_ptr_to_expr(), ffecom_arrayref_(), ffecom_char_args_x_(), ffecom_const_expr(), ffecom_expand_let_stmt(), ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_expr_power_integer_(), ffecom_expr_rw(), ffecom_expr_w(), ffecom_gen_sfuncdef_(), ffecom_intrinsic_len_(), ffecom_ptr_to_expr(), ffecom_return_expr(), ffecom_sym_transform_(), ffecom_transform_common_(), ffecom_transform_equiv_(), ffecom_type_localvar_(), ffecom_vardesc_dims_(), ffeste_begin_iterdo_(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), ffeste_io_olist_(), ffeste_R1212(), ffeste_R803(), ffeste_R804(), ffeste_R807(), ffeste_R809(), ffeste_R819B(), ffeste_R837(), ffeste_R840(), ffeste_R904(), ffeste_R907(), ffeste_R909_start(), ffeste_R910_start(), ffeste_R923A(), and ffeste_subr_beru_().

tree ffecom_expr_assign ( ffebld  expr  ) 

Definition at line 10960 of file com.c.

References FALSE, ffecom_expr_(), NULL, NULL_TREE, and TRUE.

Referenced by ffeste_io_cilist_(), ffeste_io_icilist_(), and ffeste_R839().

tree ffecom_expr_assign_w ( ffebld  expr  ) 

Definition at line 10968 of file com.c.

References FALSE, ffecom_expr_(), NULL, NULL_TREE, and TRUE.

Referenced by ffeste_R838().

tree ffecom_expr_rw ( tree  type,
ffebld  expr 
)

Definition at line 10980 of file com.c.

References assert, ffecom_expr(), ffecom_type_expr(), NULL, NULL_TREE, and stabilize_reference().

Referenced by ffecom_expr_intrinsic_(), and ffeste_begin_iterdo_().

tree ffecom_expr_w ( tree  type,
ffebld  expr 
)

Definition at line 10996 of file com.c.

References assert, ffecom_expr(), ffecom_type_expr(), NULL, NULL_TREE, and stabilize_reference().

Referenced by ffecom_expand_let_stmt(), and ffecom_expr_intrinsic_().

void ffecom_file ( const char *  name  ) 

Definition at line 12041 of file com.c.

References ffecom_file_().

Referenced by yyparse().

void ffecom_finish_compile ( void   ) 

Definition at line 11008 of file com.c.

References assert, current_function_decl, ffecom_finish_global_(), ffeglobal_drive(), and NULL_TREE.

Referenced by yyparse().

void ffecom_finish_decl ( tree  decl,
tree  init,
bool  is_top_level 
)

Definition at line 11019 of file com.c.

References assert, FALSE, and finish_decl().

Referenced by ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), ffeste_io_icilist_(), ffeste_io_inlist_(), and ffeste_io_olist_().

void ffecom_finish_progunit ( void   ) 

Definition at line 11028 of file com.c.

References current_function_decl, ffecom_end_compstmt(), finish_function(), and NULL_TREE.

Referenced by ffestd_exec_end().

tree ffecom_get_invented_identifier ( const char *  pattern,
  ... 
)

Definition at line 11041 of file com.c.

References abort, free(), get_identifier(), IDENTIFIER_INVENTED, va_end, va_start, and vasprintf().

Referenced by ffecom_char_enhance_arg_(), ffecom_do_entry_(), ffecom_end_transition(), ffecom_f2c_make_type_(), ffecom_gen_sfuncdef_(), ffecom_lookup_label(), ffecom_make_tempvar(), ffecom_start_progunit_(), ffecom_sym_transform_assign_(), ffecom_temp_label(), ffecom_transform_equiv_(), ffecom_transform_namelist_(), ffecom_vardesc_(), ffecom_vardesc_array_(), ffecom_vardesc_dims_(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), ffeste_io_icilist_(), ffeste_io_inlist_(), and ffeste_io_olist_().

ffeinfoKindtype ffecom_gfrt_basictype ( ffecomGfrt  ix  ) 

Definition at line 11058 of file com.c.

References assert, FFECOM_rttypeCHARACTER_, FFECOM_rttypeCOMPLEX_F2C_, FFECOM_rttypeCOMPLEX_GNU_, FFECOM_rttypeDBLCMPLX_F2C_, FFECOM_rttypeDBLCMPLX_GNU_, FFECOM_rttypeDOUBLE_, FFECOM_rttypeDOUBLEREAL_, FFECOM_rttypeFTNINT_, FFECOM_rttypeINTEGER_, FFECOM_rttypeLOGICAL_, FFECOM_rttypeLONGINT_, FFECOM_rttypeREAL_F2C_, FFECOM_rttypeREAL_GNU_, FFECOM_rttypeVOID_, and FFECOM_rttypeVOIDSTAR_.

Referenced by ffeintrin_basictype().

ffeinfoKindtype ffecom_gfrt_kindtype ( ffecomGfrt  ix  ) 

Definition at line 11105 of file com.c.

References assert, FFECOM_rttypeCHARACTER_, FFECOM_rttypeCOMPLEX_F2C_, FFECOM_rttypeCOMPLEX_GNU_, FFECOM_rttypeDBLCMPLX_F2C_, FFECOM_rttypeDBLCMPLX_GNU_, FFECOM_rttypeDOUBLE_, FFECOM_rttypeDOUBLEREAL_, FFECOM_rttypeFTNINT_, FFECOM_rttypeINTEGER_, FFECOM_rttypeLOGICAL_, FFECOM_rttypeLONGINT_, FFECOM_rttypeREAL_F2C_, FFECOM_rttypeREAL_GNU_, FFECOM_rttypeVOID_, FFECOM_rttypeVOIDSTAR_, FFEINFO_kindtypeANY, FFEINFO_kindtypeCHARACTER1, FFEINFO_kindtypeINTEGER1, FFEINFO_kindtypeINTEGER4, FFEINFO_kindtypeLOGICAL1, FFEINFO_kindtypeNONE, FFEINFO_kindtypeREAL1, and FFEINFO_kindtypeREAL2.

Referenced by ffecom_call_gfrt(), ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_tree_divide_(), and ffeintrin_kindtype().

void ffecom_init_0 ( void   ) 

Definition at line 11152 of file com.c.

References abort, ARRAY_SIZE, assert, atof(), BITS_PER_UNIT, bsearch(), build_common_tree_nodes(), build_common_tree_nodes_2(), build_decl, build_function_type(), build_int_2, build_pointer_type(), build_real(), BUILT_IN_NORMAL, builtin_function(), char_type_node, CHAR_TYPE_SIZE, complex_double_type_node, complex_float_type_node, complex_integer_type_node, complex_long_double_type_node, convert(), current_function_decl, dconst0, dconst1, dconst2, DECL_ALIGN, DECL_CONTEXT, DECL_EXTERNAL, DECL_USER_ALIGN, double_type_node, FALSE, fatal_error(), ffe_is_do_internal_checks, ffe_is_ugly_assign, ffecom_f2c_address_type_node, ffecom_f2c_complex_type_node, ffecom_f2c_doublecomplex_type_node, ffecom_f2c_doublereal_type_node, ffecom_f2c_flag_type_node, ffecom_f2c_ftnint_type_node, ffecom_f2c_ftnlen_one_node, ffecom_f2c_ftnlen_two_node, ffecom_f2c_ftnlen_type_node, ffecom_f2c_ftnlen_zero_node, ffecom_f2c_integer_type_node, ffecom_f2c_logical_type_node, ffecom_f2c_longint_type_node, ffecom_f2c_make_type_(), ffecom_f2c_ptr_to_ftnint_type_node, ffecom_f2c_ptr_to_ftnlen_type_node, ffecom_f2c_ptr_to_integer_type_node, ffecom_f2c_ptr_to_real_type_node, ffecom_f2c_real_type_node, ffecom_f2c_set_lio_code_(), ffecom_f2c_typecode_, ffecom_integer_one_node, ffecom_integer_type_node, ffecom_integer_zero_node, ffecom_label_kind_, ffecom_make_complex_type_(), ffecom_multi_fields_, ffecom_pointer_kind_, ffecom_tree_blockdata_type, ffecom_tree_fun_type, ffecom_tree_fun_type_void, ffecom_tree_ptr_to_fun_type, ffecom_tree_ptr_to_subr_type, ffecom_tree_subr_type, ffecom_tree_type, ffecom_tree_xargc_, ffeinfo_basictype_string(), ffeinfo_kindtype_string(), FFEINFO_kindtypeANY, FFEINFO_kindtypeCHARACTER1, FFEINFO_kindtypeINTEGER1, FFEINFO_kindtypeINTEGER2, FFEINFO_kindtypeINTEGER3, FFEINFO_kindtypeINTEGER4, FFEINFO_kindtypeINTEGERDEFAULT, FFEINFO_kindtypeLOGICAL1, FFEINFO_kindtypeLOGICAL2, FFEINFO_kindtypeLOGICAL3, FFEINFO_kindtypeLOGICAL4, FFEINFO_kindtypeNONE, FFEINFO_kindtypeREAL1, FFEINFO_kindtypeREAL2, FFEINFO_kindtypeREALDOUBLE, ffeinfo_set_type(), ffeinfo_type(), FFETARGET_f2cTYCHAR, FFETARGET_f2cTYCOMPLEX, FFETARGET_f2cTYDCOMPLEX, FFETARGET_f2cTYDREAL, FFETARGET_f2cTYINT1, FFETARGET_f2cTYLOGICAL, FFETARGET_f2cTYLOGICAL1, FFETARGET_f2cTYLOGICAL2, FFETARGET_f2cTYLONG, FFETARGET_f2cTYQUAD, FFETARGET_f2cTYREAL, FFETARGET_f2cTYSHORT, ffetype_new(), ffetype_set_ams, ffetype_set_kind(), ffetype_set_star(), ffetype_size, finish_decl(), float_type_node, FLOAT_TYPE_SIZE, fprintf(), get_identifier(), GET_MODE_SIZE, i, IDENTIFIER_GLOBAL_VALUE, integer_one_node, integer_type_node, integer_zero_node, L, layout_type(), long_double_type_node, long_integer_type_node, long_long_integer_type_node, LONG_LONG_TYPE_SIZE, long_long_unsigned_type_node, LONG_TYPE_SIZE, long_unsigned_type_node, make_node, make_signed_type(), make_unsigned_type(), names, NULL, NULL_BINDING_LEVEL, null_pointer_node, NULL_TREE, pedantic_lvalues, binding_level::prep_state, pushdecl(), pushlevel(), REAL_ARITHMETIC, REAL_VALUE_TYPE, set_sizetype(), short_integer_type_node, SHORT_TYPE_SIZE, short_unsigned_type_node, signed_char_type_node, size_t, SIZE_TYPE, sizetype, sprintf(), start_decl(), strcmp(), string_type_node, strtoul(), TREE_CHAIN, tree_cons, TREE_INT_CST_LOW, TREE_PUBLIC, TREE_STATIC, TREE_TYPE, TYPE_ALIGN, TYPE_FIELDS, TYPE_MODE, TYPE_PRECISION, TYPE_SIZE, TYPE_USER_ALIGN, ul, unsigned_char_type_node, unsigned_type_node, void_type_node, and warning.

Referenced by ffe_init_0().

void ffecom_init_2 ( void   ) 

Definition at line 11863 of file com.c.

References assert, current_function_decl, FALSE, NULL, and NULL_TREE.

Referenced by ffe_init_2().

tree ffecom_list_expr ( ffebld  list  ) 

Definition at line 11886 of file com.c.

References build_tree_list, error_mark_node, ffebld_head, ffebld_trail, ffecom_arg_expr(), length, NULL, NULL_TREE, and TREE_CHAIN.

Referenced by ffecom_char_args_x_(), and ffecom_expr_().

tree ffecom_list_ptr_to_expr ( ffebld  list  ) 

Definition at line 11926 of file com.c.

References build_tree_list, error_mark_node, ffebld_head, ffebld_trail, ffecom_arg_ptr_to_expr(), length, NULL, NULL_TREE, and TREE_CHAIN.

Referenced by ffecom_char_args_x_(), ffecom_expr_(), ffeste_R842(), and ffeste_R843().

tree ffecom_lookup_label ( ffelab  label  ) 

Definition at line 11959 of file com.c.

References assert, build_array_type(), build_decl, build_type_variant, char_type_node, current_function_decl, DECL_CONTEXT, DECL_INITIAL, DECL_MODE, error_mark_node, expand_decl(), ffecom_get_invented_identifier(), ffecom_save_tree_forever(), ffelab_hook, ffelab_set_hook, ffelab_type, FFELAB_typeANY, FFELAB_typeENDIF, FFELAB_typeFORMAT, FFELAB_typeLOOPEND, FFELAB_typeNOTLOOP, ffelab_value, ffelabValue_f, get_identifier(), make_decl_rtl(), NULL, NULL_TREE, sprintf(), TREE_CONSTANT, TREE_STATIC, and void_type_node.

Referenced by ffeste_io_cilist_(), ffeste_io_icilist_(), ffeste_labeldef_branch(), ffeste_R1001(), ffeste_R1212(), ffeste_R836(), ffeste_R837(), ffeste_R838(), ffeste_R840(), ffeste_R904(), ffeste_R907(), ffeste_R909_start(), ffeste_R910_start(), ffeste_R923A(), and ffeste_subr_beru_().

tree ffecom_make_tempvar ( const char *  commentary,
tree  type,
ffetargetCharacterSize  size,
int  elements 
)

Definition at line 12307 of file com.c.

References assert, build_array_type(), build_decl, build_int_2, build_range_type(), error_mark_node, FALSE, ffecom_f2c_ftnlen_one_node, ffecom_f2c_ftnlen_type_node, ffecom_get_invented_identifier(), FFETARGET_charactersizeNONE, finish_decl(), integer_type_node, integer_zero_node, NULL_TREE, binding_level::prep_state, and start_decl().

Referenced by ffecom_call_(), ffecom_char_args_x_(), ffecom_expand_let_stmt(), ffecom_expr_intrinsic_(), ffecom_expr_power_integer_(), ffecom_prepare_expr_(), ffecom_prepare_let_char_(), ffeste_begin_iterdo_(), ffeste_R803(), ffeste_R804(), ffeste_R807(), ffeste_R809(), ffeste_R819B(), ffeste_R904(), ffeste_R907(), ffeste_R909_start(), ffeste_R910_start(), ffeste_R923A(), and ffeste_subr_beru_().

tree ffecom_modify ( tree  newtype,
tree  lhs,
tree  rhs 
)

Definition at line 12023 of file com.c.

References error_mark_node, ffecom_2s(), NULL_TREE, stabilize_reference(), TREE_SIDE_EFFECTS, and TREE_TYPE.

Referenced by ffecom_arg_ptr_to_expr(), ffecom_do_entry_(), ffecom_expr_intrinsic_(), ffecom_expr_power_integer_(), ffecom_gen_sfuncdef_(), ffecom_let_char_(), ffeste_begin_iterdo_(), ffeste_end_iterdo_(), ffeste_io_call_(), ffeste_R1227(), ffeste_R803(), ffeste_R804(), ffeste_R807(), ffeste_R809(), ffeste_R819B(), and ffeste_R838().

void ffecom_notify_init_storage ( ffestorag  st  ) 

Definition at line 12075 of file com.c.

References assert, ffestorag_accretion, ffestorag_init, ffestorag_set_accretes, ffestorag_set_accretion, ffestorag_set_init, and NULL.

Referenced by ffecom_sym_end_transition(), ffedata_gather_(), and ffedata_value_().

void ffecom_notify_init_symbol ( ffesymbol  s  ) 

Definition at line 12118 of file com.c.

References ffesymbol_accretion, ffesymbol_init, ffesymbol_set_accretes, ffesymbol_set_accretion, ffesymbol_set_init, ffesymbol_storage, and NULL.

Referenced by ffecom_sym_end_transition(), ffedata_value_(), ffestc_R501_item(), and ffestorag_exec_layout().

void ffecom_notify_primary_entry ( ffesymbol  fn  ) 

Definition at line 12145 of file com.c.

References FALSE, ffe_is_silent, ffebld_head, ffebld_op, ffebld_trail, ffesymbol_dummyargs, ffesymbol_kind, ffesymbol_text, fprintf(), NULL, and TRUE.

Referenced by ffestd_R1102(), ffestd_R1111(), ffestd_R1219(), and ffestd_R1223().

FILE* ffecom_open_include ( char *  name,
ffewhereLine  l,
ffewhereColumn  c 
)

Definition at line 12184 of file com.c.

References ffecom_open_include_().

Referenced by ffestd_S3P4().

void ffecom_prepare_arg_ptr_to_expr ( ffebld  expr  ) 

Definition at line 12347 of file com.c.

References ffecom_prepare_expr.

Referenced by ffecom_prepare_expr_(), ffecom_prepare_let_char_(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_icilist_(), ffeste_io_impdo_(), ffeste_R909_item(), ffeste_R910_item(), and ffeste_R911_item().

bool ffecom_prepare_end ( void   ) 

Definition at line 12357 of file com.c.

References assert, FALSE, binding_level::prep_state, and TRUE.

Referenced by ffecom_expand_let_stmt(), ffecom_gen_sfuncdef_(), ffeste_begin_iterdo_(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), ffeste_io_icilist_(), ffeste_io_impdo_(), ffeste_io_inlist_(), ffeste_io_olist_(), ffeste_R1212(), ffeste_R1227(), ffeste_R803(), ffeste_R804(), ffeste_R807(), ffeste_R809(), ffeste_R819B(), ffeste_R837(), ffeste_R840(), ffeste_R909_item(), ffeste_R910_item(), and ffeste_R911_item().

void ffecom_prepare_expr_ ( ffebld  expr,
ffebld  dest 
)

Definition at line 12381 of file com.c.

References assert, char_type_node, count, ffe_is_f2c_library, ffebld_arity, ffebld_head, ffebld_info, ffebld_left, ffebld_nonter_set_hook, ffebld_op, ffebld_right, ffebld_size_known, ffebld_symter, ffebld_trail, ffecom_concat_list_count_, ffecom_concat_list_expr_, ffecom_concat_list_kill_(), ffecom_concat_list_maxlen_, ffecom_concat_list_new_(), ffecom_f2c_address_type_node, ffecom_f2c_ftnlen_type_node, ffecom_make_tempvar(), ffecom_prepare_arg_ptr_to_expr(), ffecom_prepare_expr, ffecom_prepare_ptr_to_expr(), ffecom_tree_type, ffecom_type_expr(), ffeinfo_basictype, ffeinfo_kindtype, FFEINFO_kindtypeREAL2, ffeinfo_size, ffesymbol_is_f2c, ffesymbol_where, FFETARGET_charactersizeNONE, i, ltype, make_tree_vec, NULL, NULL_TREE, binding_level::prep_state, result, s, sz(), and TREE_VEC_ELT.

Referenced by ffecom_expand_let_stmt().

void ffecom_prepare_expr_rw ( tree  type,
ffebld  expr 
)

Definition at line 12609 of file com.c.

References assert, ffecom_prepare_expr, ffecom_type_expr(), and NULL_TREE.

Referenced by ffeste_begin_iterdo_().

void ffecom_prepare_expr_w ( tree  type,
ffebld  expr 
)

Definition at line 12625 of file com.c.

References assert, ffecom_prepare_expr, ffecom_type_expr(), and NULL_TREE.

Referenced by ffecom_expand_let_stmt().

void ffecom_prepare_ptr_to_expr ( ffebld  expr  ) 

Definition at line 12657 of file com.c.

References ffecom_prepare_expr.

Referenced by ffecom_prepare_expr_().

void ffecom_prepare_return_expr ( ffebld  expr  ) 

Definition at line 12641 of file com.c.

References assert, ffecom_prepare_expr, NULL, and binding_level::prep_state.

Referenced by ffeste_R1227().

tree ffecom_ptr_to_const_expr ( ffebld  expr  ) 

Definition at line 12675 of file com.c.

References assert, error_mark_node, ffebld_arity, ffebld_op, ffebld_where, ffecom_ptr_to_expr(), integer_zero_node, NULL_TREE, and TREE_CONSTANT.

tree ffecom_ptr_to_expr ( ffebld  expr  ) 

Definition at line 12198 of file com.c.

References addr(), assert, build_pointer_type(), error_mark_node, ffebld_constant_union, ffebld_conter, ffebld_info, ffebld_op, ffebld_symter, ffebld_symter_implementation, ffecom_1(), ffecom_arrayref_(), ffecom_constantunion(), ffecom_expr(), ffecom_gfrt_, ffecom_make_gfrt_(), ffecom_save_tree(), ffecom_sym_transform_(), ffecom_tree_type, ffeinfo_basictype, ffeinfo_kindtype, ffeintrin_gfrt_indirect(), ffesymbol_hook, ffesymbol_where, NULL, NULL_TREE, s, STRIP_NOPS, TREE_CODE, and TREE_TYPE.

Referenced by ffecom_arg_ptr_to_expr(), ffecom_arrayref_(), ffecom_expr_(), ffecom_expr_intrinsic_(), and ffecom_ptr_to_const_expr().

tree ffecom_return_expr ( ffebld  expr  ) 

Definition at line 12713 of file com.c.

References assert, error_mark_node, ffebad_finish(), ffebad_here(), ffebad_start, ffebad_string(), ffecom_expr(), ffesymbol_basictype, ffesymbol_funcresult, ffesymbol_is_f2c, ffesymbol_text, ffesymbol_where_column, ffesymbol_where_line, integer_zero_node, NULL, NULL_TREE, and TREE_USED.

Referenced by ffeste_R1227().

tree ffecom_save_tree ( tree  t  ) 

Definition at line 12785 of file com.c.

References save_expr().

Referenced by ffecom_arg_ptr_to_expr(), ffecom_char_args_x_(), ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_ptr_to_expr(), ffecom_subscript_check_(), ffecom_sym_transform_(), ffeste_begin_iterdo_(), and ffeste_R840().

void ffecom_save_tree_forever ( tree  t  ) 

Definition at line 6291 of file com.c.

References ggc_alloc, i, tree_ggc_tracker::next, NULL, NUM_TRACKED_CHUNK, tracker_head, and tree_ggc_tracker::trees.

Referenced by ffecom_lookup_label(), ffecom_sym_transform_(), and ffecom_transform_common_().

void ffecom_start_compstmt ( void   ) 

Definition at line 12793 of file com.c.

References bison_rule_pushlevel_().

Referenced by ffecom_do_entry_(), ffecom_expr_power_integer_(), ffecom_gen_sfuncdef_(), and ffecom_start_progunit_().

tree ffecom_start_decl ( tree  decl,
bool  is_init 
)

Definition at line 12801 of file com.c.

References DECL_INITIAL, error_mark_node, FALSE, NULL_TREE, and start_decl().

Referenced by ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), ffeste_io_icilist_(), ffeste_io_inlist_(), and ffeste_io_olist_().

void ffecom_sym_commit ( ffesymbol  s  ) 

Definition at line 12816 of file com.c.

References assert, and ffesymbol_retractable().

Referenced by ffesymbol_retract().

ffesymbol ffecom_sym_end_transition ( ffesymbol  s  ) 

Definition at line 12832 of file com.c.

References assert, ffebld_new_item(), ffebld_new_symter(), ffecom_notify_init_storage(), ffecom_notify_init_symbol(), ffest_sym_end_transition(), ffestorag_accretion, ffestorag_init, ffestorag_parent, ffesymbol_accretion, ffesymbol_init, ffesymbol_kind, ffesymbol_retractable(), ffesymbol_storage, ffesymbol_where, and NULL.

Referenced by ffecom_end_transition(), ffestu_sym_end_transition(), and ffestu_symter_end_transition_().

ffesymbol ffecom_sym_exec_transition ( ffesymbol  s  ) 

Definition at line 12891 of file com.c.

References ffest_sym_exec_transition().

Referenced by ffecom_exec_transition(), ffeexpr_declare_parenthesized_(), ffeexpr_declare_unadorned_(), ffeexpr_sym_impdoitem_(), ffestc_R1226(), ffestu_list_exec_transition_(), ffestu_sym_exec_transition(), and ffestu_symter_exec_transition_().

ffesymbol ffecom_sym_learned ( ffesymbol  s  ) 

Definition at line 12938 of file com.c.

References ffestorag_exec_layout().

Referenced by ffeexpr_paren_rhs_let_(), ffeexpr_sym_impdoitem_(), ffeexpr_sym_lhs_call_(), ffeexpr_sym_lhs_data_(), ffeexpr_sym_lhs_extfunc_(), ffeexpr_sym_lhs_parameter_(), ffeexpr_sym_rhs_actualarg_(), ffeexpr_sym_rhs_let_(), ffeexpr_token_funsubstr_(), ffestc_promote_execdummy_(), ffestc_R803(), ffestc_R809(), ffestc_R819A(), ffestc_R819B(), ffestc_R820A(), ffestc_R820B(), ffestu_sym_end_transition(), and ffesymbol_error().

void ffecom_sym_retract ( ffesymbol  s  ) 

Definition at line 12954 of file com.c.

References assert, ffesymbol_hook, ffesymbol_retractable(), NULL, and s.

Referenced by ffesymbol_retract().

tree ffecom_temp_label ( void   ) 

Definition at line 12987 of file com.c.

References build_decl, current_function_decl, DECL_CONTEXT, DECL_MODE, ffecom_get_invented_identifier(), and void_type_node.

Referenced by ffestd_stmt_pass_(), ffeste_R904(), ffeste_R907(), ffeste_R909_start(), ffeste_R910_start(), ffeste_R923A(), and ffeste_subr_beru_().

tree ffecom_truth_value ( tree  expr  ) 

Definition at line 13008 of file com.c.

References truthvalue_conversion().

Referenced by ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_expr_power_integer_(), ffecom_intrinsic_ichar_(), ffecom_truth_value_invert(), ffeste_begin_iterdo_(), ffeste_end_iterdo_(), ffeste_io_call_(), ffeste_R803(), ffeste_R804(), ffeste_R807(), ffeste_R819B(), ffeste_R840(), and ffeste_R909_finish().

tree ffecom_truth_value_invert ( tree  expr  ) 

Definition at line 13020 of file com.c.

References ffecom_truth_value(), and invert_truthvalue().

Referenced by ffecom_expr_(), and ffecom_expr_power_integer_().

tree ffecom_type_expr ( ffebld  expr  ) 

Definition at line 13030 of file com.c.

References assert, error_mark_node, ffebld_info, ffebld_op, ffecom_tree_type, ffeinfo_basictype, ffeinfo_kindtype, and NULL.

Referenced by ffecom_expr_rw(), ffecom_expr_w(), ffecom_prepare_expr_(), ffecom_prepare_expr_rw(), ffecom_prepare_expr_w(), and ffeste_R809().

tree ffecom_which_entrypoint_decl ( void   ) 

Definition at line 13101 of file com.c.

References assert, and NULL_TREE.

Referenced by ffestd_stmt_pass_().

Variable Documentation

tree ffecom_f2c_address_type_node

Definition at line 191 of file com.c.

Referenced by ffecom_arg_ptr_to_expr(), ffecom_init_0(), ffecom_init_decl_processing(), ffecom_let_char_(), ffecom_prepare_expr_(), and ffecom_prepare_let_char_().

tree ffecom_f2c_complex_type_node

Definition at line 195 of file com.c.

Referenced by ffecom_arglist_expr_(), ffecom_init_0(), ffecom_init_decl_processing(), and ffecom_make_gfrt_().

tree ffecom_f2c_doublecomplex_type_node

Definition at line 196 of file com.c.

Referenced by ffecom_arglist_expr_(), ffecom_init_0(), ffecom_init_decl_processing(), and ffecom_make_gfrt_().

tree ffecom_f2c_doublereal_type_node

Definition at line 194 of file com.c.

Referenced by ffecom_arglist_expr_(), ffecom_f2c_make_type_(), ffecom_init_0(), ffecom_init_decl_processing(), and ffecom_make_gfrt_().

tree ffecom_f2c_flag_type_node

Definition at line 199 of file com.c.

Referenced by ffecom_init_0(), ffecom_init_decl_processing(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), ffeste_io_icilist_(), ffeste_io_inlist_(), and ffeste_io_olist_().

tree ffecom_f2c_ftnint_type_node

Definition at line 205 of file com.c.

Referenced by ffecom_init_0(), ffecom_init_decl_processing(), ffecom_make_gfrt_(), ffecom_subscript_check_(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_dolio_(), ffeste_io_ialist_(), ffeste_io_icilist_(), ffeste_io_inlist_(), and ffeste_io_olist_().

tree ffecom_f2c_ftnlen_one_node

Definition at line 202 of file com.c.

Referenced by ffecom_char_args_x_(), ffecom_char_enhance_arg_(), ffecom_init_0(), ffecom_init_decl_processing(), ffecom_intrinsic_len_(), ffecom_make_tempvar(), ffecom_transform_namelist_(), ffecom_type_localvar_(), ffeste_io_dofio_(), and ffeste_io_douio_().

tree ffecom_f2c_ftnlen_two_node

Definition at line 203 of file com.c.

Referenced by ffecom_init_0(), ffecom_init_decl_processing(), ffeste_io_dofio_(), and ffeste_io_douio_().

tree ffecom_f2c_ftnlen_type_node

Definition at line 200 of file com.c.

Referenced by ffecom_arg_ptr_to_expr(), ffecom_char_args_x_(), ffecom_char_enhance_arg_(), ffecom_gen_sfuncdef_(), ffecom_init_0(), ffecom_init_decl_processing(), ffecom_intrinsic_len_(), ffecom_let_char_(), ffecom_make_tempvar(), ffecom_prepare_expr_(), ffecom_prepare_let_char_(), ffecom_transform_namelist_(), ffecom_type_localvar_(), ffecom_vardesc_dims_(), ffeste_io_dofio_(), ffeste_io_dolio_(), ffeste_io_douio_(), ffeste_io_inlist_(), and ffeste_io_olist_().

tree ffecom_f2c_ftnlen_zero_node

Definition at line 201 of file com.c.

Referenced by ffecom_arg_ptr_to_expr(), ffecom_do_entry_(), ffecom_init_0(), ffecom_init_decl_processing(), ffecom_intrinsic_ichar_(), ffecom_intrinsic_len_(), and ffecom_let_char_().

tree ffecom_f2c_integer_type_node

Definition at line 189 of file com.c.

Referenced by ffecom_arglist_expr_(), ffecom_expr_intrinsic_(), ffecom_init_0(), ffecom_init_decl_processing(), and ffecom_make_gfrt_().

tree ffecom_f2c_logical_type_node

Definition at line 198 of file com.c.

Referenced by ffecom_init_0(), ffecom_init_decl_processing(), and ffecom_make_gfrt_().

tree ffecom_f2c_longint_type_node

Definition at line 197 of file com.c.

Referenced by ffecom_arglist_expr_(), ffecom_expr_intrinsic_(), ffecom_init_0(), ffecom_init_decl_processing(), and ffecom_make_gfrt_().

tree ffecom_f2c_ptr_to_ftnint_type_node

Definition at line 206 of file com.c.

Referenced by ffecom_init_0(), ffecom_init_decl_processing(), ffeste_io_dolio_(), and ffeste_io_inlist_().

tree ffecom_f2c_ptr_to_ftnlen_type_node

Definition at line 204 of file com.c.

Referenced by ffecom_arg_ptr_to_expr(), ffecom_init_0(), ffecom_init_decl_processing(), ffecom_let_char_(), ffecom_type_vardesc_(), ffecom_vardesc_dims_(), ffeste_io_dofio_(), ffeste_io_dolio_(), and ffeste_io_douio_().

tree ffecom_f2c_real_type_node

Definition at line 192 of file com.c.

Referenced by ffecom_arglist_expr_(), ffecom_expr_intrinsic_(), ffecom_f2c_make_type_(), ffecom_init_0(), and ffecom_init_decl_processing().

int ffecom_f2c_typecode_[FFEINFO_basictype][FFEINFO_kindtype]

Definition at line 188 of file com.c.

Referenced by ffecom_f2c_set_lio_code_(), and ffecom_init_0().

tree ffecom_integer_one_node

Definition at line 161 of file com.c.

Referenced by ffecom_init_0(), ffecom_init_decl_processing(), ffecom_sym_transform_(), ffecom_vardesc_dims_(), ffeste_begin_iterdo_(), ffeste_end_iterdo_(), ffeste_io_dolio_(), and ffeste_io_icilist_().

tree ffecom_integer_type_node

Definition at line 159 of file com.c.

Referenced by ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_init_0(), ffecom_sym_transform_(), ffecom_transform_common_(), ffecom_transform_equiv_(), ffecom_type_localvar_(), ffeste_begin_iterdo_(), ffeste_R904(), ffeste_R907(), ffeste_R909_start(), ffeste_R910_start(), ffeste_R923A(), and ffeste_subr_beru_().

tree ffecom_integer_zero_node

Definition at line 160 of file com.c.

Referenced by ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_init_0(), ffecom_init_decl_processing(), ffecom_sym_transform_(), ffecom_transform_equiv_(), ffeste_begin_iterdo_(), ffeste_end_iterdo_(), ffeste_io_cilist_(), ffeste_io_cllist_(), ffeste_io_ialist_(), ffeste_io_icilist_(), ffeste_io_olist_(), and ffeste_R909_finish().

ffeinfoKindtype ffecom_label_kind_

Definition at line 186 of file com.c.

Referenced by ffecom_init_0().

ffeinfoKindtype ffecom_pointer_kind_

Definition at line 185 of file com.c.

Referenced by ffecom_init_0().

ffecomSymbol ffecom_symbol_null_

Definition at line 177 of file com.c.

tree ffecom_tree_type[FFEINFO_basictype][FFEINFO_kindtype]

Definition at line 162 of file com.c.

Referenced by ffecom_arglist_expr_(), ffecom_call_(), ffecom_constantunion(), ffecom_do_entry_(), ffecom_expand_let_stmt(), ffecom_expr_(), ffecom_expr_intrinsic_(), ffecom_f2c_set_lio_code_(), ffecom_gen_sfuncdef_(), ffecom_init_0(), ffecom_init_decl_processing(), ffecom_prepare_expr_(), ffecom_ptr_to_expr(), ffecom_start_progunit_(), ffecom_sym_transform_(), ffecom_tree_divide_(), ffecom_type_expr(), ffecom_type_localvar_(), ffecom_widest_expr_type_(), ffeste_io_dofio_(), ffeste_io_dolio_(), ffeste_io_douio_(), ffeste_R810(), signed_type(), type_for_mode(), type_for_size(), and unsigned_type().

tree string_type_node

Definition at line 150 of file com.c.

Generated on Wed Apr 8 15:49:19 2009 for Open64 by  doxygen 1.5.6