Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
#include "defines.h"
#include "host.m"
#include "host.h"
#include "target.m"
#include "target.h"
#include "globals.m"
#include "tokens.m"
#include "sytb.m"
#include "p_globals.m"
#include "debug.m"
#include "p_io.m"
#include "globals.h"
#include "tokens.h"
#include "sytb.h"
#include "p_globals.h"
#include "p_io.h"
Go to the source code of this file.
Functions | |
long * | _fmt_parse (void(**msg_rtn)(), char *, int, long *, boolean *) |
void | emit_format_msg (int, int, int) |
static int | find_ciitem_idx (io_stmt_type) |
static boolean | parse_io_control_list (opnd_type *, io_stmt_type) |
static int | pre_parse_format (int, int) |
static int | create_format_tmp (int) |
void | parse_backspace_stmt (void) |
void | parse_buffer_stmt (void) |
void | parse_close_stmt (void) |
void | parse_decode_stmt (void) |
void | parse_encode_stmt (void) |
void | parse_endfile_stmt (void) |
void | parse_format_stmt (void) |
void | parse_inquire_stmt (void) |
void | parse_open_stmt (void) |
void | parse_print_stmt (void) |
void | parse_read_stmt (void) |
void | parse_rewind_stmt (void) |
void | parse_write_stmt (void) |
boolean | parse_io_list (opnd_type *result_opnd) |
Variables | |
static char | USMID [] = "\n@(#)5.0_pl/sources/p_io.c 5.3 06/17/99 09:28:10\n" |
long* _fmt_parse | ( | void(**)() | msg_rtn, |
char * | , | ||
int | , | ||
long * | , | ||
boolean * | |||
) |
static int create_format_tmp | ( | int | const_idx | ) | [static] |
Definition at line 3276 of file p_io.c.
References Assignment_Stmt, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_DATA_INIT, ATD_FLD, ATD_READ_ONLY_VAR, ATD_SAVED, ATD_STOR_BLK_IDX, ATD_TMP_IDX, ATD_TYPE_IDX, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_COLUMN_NUM, BD_LB_FLD, BD_LB_IDX, BD_LEN_FLD, BD_LEN_IDX, BD_LINE_NUM, BD_RANK, BD_RESOLVED, BD_SM_FLD, BD_SM_IDX, BD_UB_FLD, BD_UB_IDX, BD_XT_FLD, BD_XT_IDX, Before, C_INT_TO_CN, Character, Character_4, CLEAR_TBL_NTRY, CN_EXTRA_ZERO_WORD, CN_INT_TO_C, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, CN_TYPE_IDX, Constant_Size, curr_scp_idx, curr_stmt_sh_idx, Explicit_Shape, FALSE, size_offset_entry::fld, Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), size_offset_entry::idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_PREV_LIST_IDX, IL_Tbl_Idx, Init_Opr, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPR, IR_TYPE_IDX, L, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_type_tbl(), NULL, NULL_IDX, reserve_array_ntry(), SCP_SB_STACK_IDX, SCP_SB_STATIC_INIT_IDX, set_stride_for_first_dim(), SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, Shared, stmt_start_col, stmt_start_line, stride, TRACE, TRUE, TYP_BIT_LEN, TYP_IDX, TYP_TYPE, TYP_WORK_IDX, type_tbl, Typeless, and TYPELESS_DEFAULT_TYPE.
Referenced by parse_decode_stmt(), parse_encode_stmt(), parse_format_stmt(), parse_io_control_list(), parse_print_stmt(), parse_read_stmt(), and parse_write_stmt().
void emit_format_msg | ( | int | msg_num, |
int | column, | ||
int | ed_column | ||
) |
Definition at line 1190 of file p_io.c.
References ANSI_EMPTY_PAREN_MSG, AT_NAME_LEN, CN_CONST, E_WITH_D_NON_ANSI, EXIT, EXPECTING_RIGHT_PAREN, format_cn_idx, format_line_n_col(), Format_Stmt, H_IS_OBSOLETE_IN_F90, ignore_trailing_chars, INVALID_REP_COUNT, cc_stmt_buf_line_entry::line, MINUS_X_NON_ANSI, MISSING_WIDTH_NON_ANSI, msg_num_tbl, NON_ANSI_EDIT_DESCRIPTOR, NON_ANSI_NULL_DESCRIPTOR, PRINTMSG(), REP_SLASH_NON_ANSI, stmt_label_idx, stmt_type, TRAILING_CHARS, and ZERO_WIDTH_NON_ANSI.
Referenced by pre_parse_format().
static int find_ciitem_idx | ( | io_stmt_type | stmt_type | ) | [static] |
Definition at line 2452 of file p_io.c.
References ciitem_tbl_entry::ciitem_list, ciitem_tbl, Func_Entry, Func_Exit, idx, name, NULL, ciitem_tbl_entry::num_diff_ciitems, start, stmt_type, token, TOKEN_LEN, TOKEN_STR, TRACE, and TRUE.
Referenced by parse_io_control_list().
void parse_backspace_stmt | ( | void | ) |
Definition at line 85 of file p_io.c.
References ADD_ATTR_TO_LOCAL_LIST, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATP_ELEMENTAL, ATP_PURE, Backspace, Backspace_Attr_Idx, BACKSPACE_LIB_ENTRY, BACKSPACE_NAME_LEN, Call_Opr, COPY_OPND, create_lib_entry_attr(), CURR_BLK_NO_EXEC, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_EOS, Func_Entry, Func_Exit, glb_tbl_idx, IL_ARG_DESC_VARIANT, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_VALUE, LPAREN, matched_specific_token(), NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, parse_err_flush(), parse_expr(), parse_io_control_list(), PRINTMSG(), SCP_ATTR_IDX, SH_ERR_FLG, SH_IR_IDX, stmt_type, stmt_type_str, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void parse_buffer_stmt | ( | void | ) |
Definition at line 194 of file p_io.c.
References ADD_ATTR_TO_LOCAL_LIST, AT_Tbl_Idx, Buffer_In_Attr_Idx, BUFFER_IN_LIB_ENTRY, BUFFER_IN_NAME_LEN, Buffer_Out_Attr_Idx, BUFFER_OUT_LIB_ENTRY, BUFFER_OUT_NAME_LEN, Call_Opr, CIF_Buffer_In_Stmt, CIF_Buffer_Out_Stmt, cif_flags, cif_stmt_type_rec(), COMMA, COPY_OPND, create_lib_entry_attr(), CURR_BLK_NO_EXEC, curr_stmt_category, curr_stmt_sh_idx, EOS, EOS_STR, Error, Executable_Stmt_Cat, EXIT, FALSE, Find_EOS, Func_Entry, Func_Exit, glb_tbl_idx, IL_ARG_DESC_VARIANT, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_VALUE, LPAREN, mark_attr_defined(), MATCHED_TOKEN_CLASS, MISC_RECS, NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, parse_deref(), parse_err_flush(), parse_expr(), PRINTMSG(), RPAREN, SH_IR_IDX, statement_number, Tok_Class_Id, token, TOKEN_COLUMN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void parse_close_stmt | ( | void | ) |
Definition at line 414 of file p_io.c.
References ADD_ATTR_TO_LOCAL_LIST, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATP_ELEMENTAL, ATP_PURE, Call_Opr, Close, Close_Attr_Idx, CLOSE_LIB_ENTRY, CLOSE_NAME_LEN, COPY_OPND, create_lib_entry_attr(), CURR_BLK_NO_EXEC, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_EOS, Func_Entry, Func_Exit, glb_tbl_idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LINE_NUM_L, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_VALUE, matched_specific_token(), NTR_IR_TBL, NULL, NULL_IDX, parse_err_flush(), parse_io_control_list(), PRINTMSG(), SCP_ATTR_IDX, SH_ERR_FLG, SH_IR_IDX, stmt_type, stmt_type_str, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void parse_decode_stmt | ( | void | ) |
Definition at line 498 of file p_io.c.
References AT_DCL_ERR, AT_DEFINED, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATL_CLASS, build_fwd_ref_entry(), Ch_Class_Digit, Character, cif_flags, CIF_Label_Referenced_As_Format, cif_usage_rec(), CN_Tbl_Idx, CN_TYPE_IDX, COMMA, COPY_OPND, create_format_tmp(), CURR_BLK_NO_EXEC, curr_stmt_category, curr_stmt_sh_idx, digit_is_format_label(), EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_Comma, Find_EOS, Find_Rparen, format_cn_idx, Format_Ref, Func_Entry, Func_Exit, idx, ignore_trailing_chars, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_LIST_CNT, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LIST_CNT_L, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_BUF_IDX, LA_CH_CLASS, LA_CH_VALUE, Label, Lbl_Format, cc_stmt_buf_line_entry::line, LN_DEF_LOC, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, parse_deref(), parse_err_flush(), parse_expr(), parse_io_list(), pre_parse_format(), PRINTMSG(), Read_Formatted_Opr, RPAREN, set_format_start_idx(), SH_IR_IDX, srch_sym_tbl(), Tok_Class_Id, Tok_Class_Label, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_ERR, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, TYP_TYPE, TYPELESS_DEFAULT_TYPE, and XREF_RECS.
void parse_encode_stmt | ( | void | ) |
Definition at line 741 of file p_io.c.
References AT_DCL_ERR, AT_DEFINED, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATL_CLASS, build_fwd_ref_entry(), Ch_Class_Digit, Character, cif_flags, CIF_Label_Referenced_As_Format, cif_usage_rec(), CN_Tbl_Idx, CN_TYPE_IDX, COMMA, COPY_OPND, create_format_tmp(), CURR_BLK_NO_EXEC, curr_stmt_category, curr_stmt_sh_idx, digit_is_format_label(), EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_Comma, Find_EOS, Find_Rparen, format_cn_idx, Format_Ref, Func_Entry, Func_Exit, idx, ignore_trailing_chars, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_LIST_CNT, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LIST_CNT_L, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_BUF_IDX, LA_CH_CLASS, LA_CH_VALUE, Label, Lbl_Format, cc_stmt_buf_line_entry::line, LN_DEF_LOC, LPAREN, mark_attr_defined(), matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, parse_deref(), parse_err_flush(), parse_expr(), parse_io_list(), pre_parse_format(), PRINTMSG(), RPAREN, set_format_start_idx(), SH_IR_IDX, srch_sym_tbl(), Tok_Class_Id, Tok_Class_Label, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_ERR, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, TYP_TYPE, TYPELESS_DEFAULT_TYPE, Write_Formatted_Opr, and XREF_RECS.
void parse_endfile_stmt | ( | void | ) |
Definition at line 979 of file p_io.c.
References ADD_ATTR_TO_LOCAL_LIST, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATP_ELEMENTAL, ATP_PURE, Call_Opr, CIF_Endfile_Stmt, cif_flags, cif_stmt_type_rec(), COPY_OPND, create_lib_entry_attr(), CURR_BLK_NO_EXEC, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, Endfile, Endfile_Attr_Idx, ENDFILE_LIB_ENTRY, ENDFILE_NAME_LEN, EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_EOS, Func_Entry, Func_Exit, glb_tbl_idx, IL_ARG_DESC_VARIANT, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_VALUE, LPAREN, matched_specific_token(), MISC_RECS, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, parse_err_flush(), parse_expr(), parse_io_control_list(), PRINTMSG(), SCP_ATTR_IDX, SH_ERR_FLG, SH_IR_IDX, statement_number, stmt_type, stmt_type_str, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
Referenced by parse_end_stmt().
void parse_format_stmt | ( | void | ) |
Definition at line 1091 of file p_io.c.
References AT_NAME_LEN, ATL_CLASS, ATL_FORMAT_TMP, ATL_PP_FORMAT_TMP, create_format_tmp(), CURR_BLK_NO_EXEC, curr_stmt_category, EOS, Error, EXIT, Find_EOS, format_cn_idx, Func_Entry, Func_Exit, Implicit_None_Stmt_Cat, iss_blk_stk_err(), LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, Lbl_Format, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, NULL, NULL_IDX, parse_err_flush(), pre_parse_format(), PRINTMSG(), set_format_start_idx(), stmt_label_idx, Tok_Class_Format_Str, Tok_Class_Punct, Tok_EOS, token, TOKEN_BUF_IDX, TOKEN_COLUMN, TOKEN_CONST_TBL_IDX, TOKEN_LINE, and TRACE.
void parse_inquire_stmt | ( | void | ) |
Definition at line 1324 of file p_io.c.
References ADD_ATTR_TO_LOCAL_LIST, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATP_ELEMENTAL, ATP_PURE, Call_Opr, COPY_OPND, create_lib_entry_attr(), CURR_BLK_NO_EXEC, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, EOS, EOS_STR, EQUAL, Error, Executable_Stmt_Cat, FALSE, Find_EOS, Find_Rparen, Func_Entry, Func_Exit, glb_tbl_idx, IL_OPND, IL_Tbl_Idx, Inquire, Inquire_Attr_Idx, Inquire_Iolength_Opr, INQUIRE_LIB_ENTRY, INQUIRE_NAME_LEN, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_L, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_BUF_IDX, LA_CH_STMT_NUM, LA_CH_VALUE, LPAREN, mark_attr_defined(), matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, parse_deref(), parse_err_flush(), parse_io_control_list(), parse_io_list(), PRINTMSG(), reset_lex(), RPAREN, SCP_ATTR_IDX, SH_ERR_FLG, SH_IR_IDX, stmt_type, stmt_type_str, Tok_Class_Id, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
static boolean parse_io_control_list | ( | opnd_type * | result_opnd, |
io_stmt_type | stmt_type | ||
) | [static] |
Definition at line 2523 of file p_io.c.
References ADVANCE_IDX, Ansi, arg_idx_tbl, AT_DCL_ERR, AT_DEFINED, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, ATL_CLASS, ATP_HAS_ALT_RETURN, Backspace, Backspace_Attr_Idx, build_fwd_ref_entry(), Ch_Class_Digit, Character, check_label_ref(), cif_flags, CIF_Label_Referenced_As_Format, cif_usage_rec(), ciitem_tbl_entry::ciitem_list, ciitem_tbl, Close, Close_Attr_Idx, CN_CONST, CN_INT_TO_C, CN_Tbl_Idx, CN_TYPE_IDX, COMMA, COPY_OPND, create_format_tmp(), curr_stmt_sh_idx, digit_is_format_label(), END_IDX, Endfile, Endfile_Attr_Idx, EOR_IDX, Error, EXIT, Exp_Form, FALSE, FILE_IDX, find_ciitem_idx(), Find_Comma_Rparen, Find_EOS, find_opnd_line_and_column(), FMT_IDX, format_cn_idx, Format_Form, Format_Ref, Func_Entry, Func_Exit, glb_tbl_idx, idx, ignore_trailing_chars, IL_ARG_DESC_VARIANT, IL_COL_NUM, IL_FLD, IL_FORMAT_EXPECTED, IL_IDX, IL_LINE_NUM, IL_LIST_CNT, IL_NAMELIST_EXPECTED, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Inquire, Inquire_Attr_Idx, io_stmt_str, LA_CH_BUF_IDX, LA_CH_CLASS, LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, Label, Label_Form, Lbl_Format, LN_DEF_LOC, LPAREN, mark_attr_defined(), MATCHED_TOKEN_CLASS, name, Namelist_Form, Namelist_Grp, next_arg_is_kwd_equal(), NEXT_LA_CH, NO_Tbl_Idx, NTR_IR_LIST_TBL, ntr_sym_tbl(), NULL, NULL_IDX, ciitem_tbl_entry::num_ciitems, Open, Open_Attr_Idx, OPND_FLD, OPND_IDX, OPND_LIST_CNT, parse_deref(), parse_err_flush(), parse_expr(), pre_parse_format(), PRINTMSG(), Read, REC_IDX, Referenced, Rewind, Rewind_Attr_Idx, RPAREN, set_format_start_idx(), SH_COL_NUM, SH_GLB_LINE, SIZE_IDX, srch_sym_tbl(), STAR, stmt_start_col, stmt_start_line, stmt_type, Tok_Class_Id, Tok_Class_Label, token, TOKEN_COLUMN, TOKEN_ERR, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TOUPPER, TRACE, TRUE, TYP_IDX, TYP_TYPE, UNIT_IDX, Var_Only_Form, Write, and XREF_RECS.
Referenced by parse_backspace_stmt(), parse_close_stmt(), parse_endfile_stmt(), parse_inquire_stmt(), parse_open_stmt(), parse_read_stmt(), parse_rewind_stmt(), and parse_write_stmt().
boolean parse_io_list | ( | opnd_type * | result_opnd | ) |
Definition at line 2318 of file p_io.c.
References COMMA, COPY_OPND, Decode_Stmt, EOS, Find_EOS, Func_Entry, Func_Exit, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, is_implied_do(), LA_CH_BUF_IDX, LA_CH_STMT_NUM, LA_CH_VALUE, LPAREN, mark_attr_defined(), next_char, NEXT_LA_CH, next_tok_is_paren_slash(), NTR_IR_LIST_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, OPND_LIST_CNT, paren_grp_is_cplx_const(), parse_err_flush(), parse_expr(), parse_imp_do(), Read_Stmt, reset_lex(), RPAREN, scan_thru_close_paren(), stmt_type, TRACE, and TRUE.
Referenced by parse_decode_stmt(), parse_encode_stmt(), parse_inquire_stmt(), parse_operand(), parse_print_stmt(), parse_read_stmt(), and parse_write_stmt().
void parse_open_stmt | ( | void | ) |
Definition at line 1466 of file p_io.c.
References ADD_ATTR_TO_LOCAL_LIST, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATP_ELEMENTAL, ATP_PURE, Call_Opr, COPY_OPND, create_lib_entry_attr(), CURR_BLK_NO_EXEC, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_EOS, Func_Entry, Func_Exit, glb_tbl_idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LINE_NUM_L, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_VALUE, matched_specific_token(), NTR_IR_TBL, NULL, NULL_IDX, Open, Open_Attr_Idx, OPEN_LIB_ENTRY, OPEN_NAME_LEN, parse_err_flush(), parse_io_control_list(), PRINTMSG(), SCP_ATTR_IDX, SH_ERR_FLG, SH_IR_IDX, stmt_type, stmt_type_str, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void parse_print_stmt | ( | void | ) |
Definition at line 1550 of file p_io.c.
References AT_DCL_ERR, AT_DEFINED, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATL_CLASS, ATP_ELEMENTAL, ATP_PURE, build_fwd_ref_entry(), Ch_Class_Digit, Character, cif_flags, CIF_Label_Referenced_As_Format, cif_usage_rec(), ciitem_tbl, CN_Tbl_Idx, CN_TYPE_IDX, COMMA, COPY_OPND, create_format_tmp(), CURR_BLK_NO_EXEC, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, digit_is_format_label(), EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_Comma, Find_EOS, format_cn_idx, Format_Ref, Func_Entry, Func_Exit, idx, ignore_trailing_chars, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_LIST_CNT, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LIST_CNT_L, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_BUF_IDX, LA_CH_CLASS, LA_CH_VALUE, Label, Lbl_Format, cc_stmt_buf_line_entry::line, LN_DEF_LOC, matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, ciitem_tbl_entry::num_ciitems, parse_err_flush(), parse_expr(), parse_io_list(), pre_parse_format(), PRINTMSG(), SCP_ATTR_IDX, set_format_start_idx(), SH_IR_IDX, srch_sym_tbl(), STAR, stmt_type, stmt_type_str, Tok_Class_Label, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_ERR, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, TYP_TYPE, TYPELESS_DEFAULT_TYPE, Write, Write_Formatted_Opr, and XREF_RECS.
void parse_read_stmt | ( | void | ) |
Definition at line 1769 of file p_io.c.
References AT_DCL_ERR, AT_DEFINED, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATL_CLASS, build_fwd_ref_entry(), Ch_Class_Digit, Character, cif_flags, CIF_Label_Referenced_As_Format, cif_usage_rec(), ciitem_tbl, CN_Tbl_Idx, CN_TYPE_IDX, COMMA, COPY_OPND, create_format_tmp(), CURR_BLK_NO_EXEC, curr_stmt_category, curr_stmt_sh_idx, digit_is_format_label(), EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_Comma, Find_EOS, format_cn_idx, Format_Ref, Func_Entry, Func_Exit, idx, ignore_trailing_chars, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_LIST_CNT, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LIST_CNT_L, IR_OPND_L, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_BUF_IDX, LA_CH_CLASS, LA_CH_VALUE, Label, Lbl_Format, cc_stmt_buf_line_entry::line, LN_DEF_LOC, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, ciitem_tbl_entry::num_ciitems, parse_err_flush(), parse_expr(), parse_io_control_list(), parse_io_list(), pre_parse_format(), PRINTMSG(), Read, Read_Formatted_Opr, set_format_start_idx(), SH_IR_IDX, srch_sym_tbl(), STAR, Tok_Class_Label, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_ERR, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, TYP_TYPE, TYPELESS_DEFAULT_TYPE, and XREF_RECS.
void parse_rewind_stmt | ( | void | ) |
Definition at line 1990 of file p_io.c.
References ADD_ATTR_TO_LOCAL_LIST, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATP_ELEMENTAL, ATP_PURE, Call_Opr, COPY_OPND, create_lib_entry_attr(), CURR_BLK_NO_EXEC, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_EOS, Func_Entry, Func_Exit, glb_tbl_idx, IL_ARG_DESC_VARIANT, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_VALUE, LPAREN, matched_specific_token(), NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, parse_err_flush(), parse_expr(), parse_io_control_list(), PRINTMSG(), Rewind, Rewind_Attr_Idx, REWIND_LIB_ENTRY, REWIND_NAME_LEN, SCP_ATTR_IDX, SH_ERR_FLG, SH_IR_IDX, stmt_type, stmt_type_str, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void parse_write_stmt | ( | void | ) |
Definition at line 2097 of file p_io.c.
References Ansi, AT_DCL_ERR, AT_DEFINED, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATL_CLASS, build_fwd_ref_entry(), Ch_Class_Digit, Character, ciitem_tbl, CN_Tbl_Idx, CN_TYPE_IDX, COMMA, COPY_OPND, create_format_tmp(), CURR_BLK_NO_EXEC, curr_stmt_category, curr_stmt_sh_idx, digit_is_format_label(), EOS, EOS_STR, Error, Executable_Stmt_Cat, FALSE, Find_Comma, Find_EOS, format_cn_idx, Format_Ref, Func_Entry, Func_Exit, idx, ignore_trailing_chars, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_LIST_CNT, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, INSERT_IO_END, INSERT_IO_START, IR_COL_NUM, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LIST_CNT_L, IR_OPND_L, IR_OPND_R, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_BUF_IDX, LA_CH_CLASS, LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, Label, Lbl_Format, cc_stmt_buf_line_entry::line, LN_DEF_LOC, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, ciitem_tbl_entry::num_ciitems, parse_err_flush(), parse_expr(), parse_io_control_list(), parse_io_list(), pre_parse_format(), PRINTMSG(), set_format_start_idx(), SH_IR_IDX, srch_sym_tbl(), STAR, Tok_Class_Label, Tok_Class_Punct, Tok_EOS, token, TOKEN_COLUMN, TOKEN_ERR, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, TYP_TYPE, TYPELESS_DEFAULT_TYPE, Write, and Write_Formatted_Opr.
static int pre_parse_format | ( | int | const_idx, |
int | lbl_name_len | ||
) | [static] |
Definition at line 3167 of file p_io.c.
References _fmt_parse, CLEAR_TBL_NTRY, CN_CONST, CN_INT_TO_C, CN_TYPE_IDX, COMPILER_CALL_ANSI_95, COMPILER_CALL_NO_ANSI, emit_format_msg(), FALSE, Func_Entry, Func_Exit, on_off_flags_entry::issue_ansi_messages, MEM_FREE, ntr_const_tbl(), ntr_type_tbl(), NULL, NULL_IDX, on_off_flags, TRACE, TYP_BIT_LEN, TYP_IDX, TYP_TYPE, TYP_WORK_IDX, type_tbl, and Typeless.
Referenced by parse_decode_stmt(), parse_encode_stmt(), parse_format_stmt(), parse_io_control_list(), parse_print_stmt(), parse_read_stmt(), and parse_write_stmt().