view anagram/guisupport/profile.h @ 21:1c9dac05d040

Add lint-style FALLTHROUGH annotations to fallthrough cases. (in the parse engine and thus the output code) Document this, because the old output causes warnings with gcc10.
author David A. Holland
date Mon, 13 Jun 2022 00:04:38 -0400
parents 13d2b8934445
children 5581ef01f993
line wrap: on
line source

#ifndef PROFILE_H_1198351949
#define PROFILE_H_1198351949

typedef union {
  long alignment;
  char ag_vt_2[sizeof(int)];
  char ag_vt_4[sizeof(cint)];
  char ag_vt_5[sizeof(IPoint)];
  char ag_vt_6[sizeof(IRectangle)];
} parseRegEntry_vs_type;

typedef enum {
  parseRegEntry_registry_data_token = 1, parseRegEntry_registry_entry_token,
  parseRegEntry_eof_token = 7, parseRegEntry_qualified_registry_entry_token,
  parseRegEntry_pure_registry_entry_token,
  parseRegEntry_accepted_qualifier_token,
  parseRegEntry_unaccepted_qualifier_token,
  parseRegEntry_file_name_char_token,
  parseRegEntry_ag201_registry_entry_token = 15,
  parseRegEntry_name_token = 17, parseRegEntry_color_pair_token = 19,
  parseRegEntry_field_id_token = 21, parseRegEntry_font_flags_token,
  parseRegEntry_integer_token, parseRegEntry_point_token = 30,
  parseRegEntry_rectangle_token = 32, parseRegEntry_file_name_token = 35,
  parseRegEntry_qual_expr_token = 37, parseRegEntry_name_char_token = 44,
  parseRegEntry_digit_token, parseRegEntry_signed_integer_token,
  parseRegEntry_hex_integer_token, parseRegEntry_hex_digit_token
} parseRegEntry_token_type;

typedef struct parseRegEntry_pcb_struct{
  parseRegEntry_token_type token_number, reduction_token, error_frame_token;
  int input_code;
  int input_value;
  int line, column;
  int ssx, sn, error_frame_ssx;
  int drt, dssx, dsn;
  int ss[128];
  parseRegEntry_vs_type vs[128];
  int ag_ap;
  const char *error_message;
  char read_flag;
  char exit_flag;
  int bts[128], btsx;
  int lab[22], rx, fx;
  const unsigned char *key_sp;
  int save_index, key_state;
  char ag_msg[82];
  const  int *ag_dtl;
  int ag_dsn;
} parseRegEntry_pcb_type;

#ifndef PRULE_CONTEXT
#define PRULE_CONTEXT(pcb)  (&((pcb).cs[(pcb).ssx]))
#define PERROR_CONTEXT(pcb) ((pcb).cs[(pcb).error_frame_ssx])
#define PCONTEXT(pcb)       ((pcb).cs[(pcb).ssx])
#endif

#ifndef AG_RUNNING_CODE
/* PCB.exit_flag values */
#define AG_RUNNING_CODE         0
#define AG_SUCCESS_CODE         1
#define AG_SYNTAX_ERROR_CODE    2
#define AG_REDUCTION_ERROR_CODE 3
#define AG_STACK_ERROR_CODE     4
#define AG_SEMANTIC_ERROR_CODE  5
#endif

extern parseRegEntry_pcb_type parseRegEntry_pcb;
void init_parseRegEntry(void);
void parseRegEntry(void);
#endif