--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/agcl/contrib/good/bug-I158.h	Sat Dec 22 17:52:45 2007 -0500
@@ -0,0 +1,112 @@
+#ifndef BUG-I158_H
+#define BUG-I158_H
+
+typedef union {
+  double alignment;
+  char ag_vt_2[sizeof(int)];
+  char ag_vt_4[sizeof(double)];
+  char ag_vt_5[sizeof(char *)];
+} bug-I158_vs_type;
+
+typedef enum {
+  bug-I158_step_part_token = 1, bug-I158_const_token, bug-I158_number_token,
+  bug-I158_intnum_token, bug-I158_symbol_or_lineno_token,
+  bug-I158_hashed_number_token, bug-I158_SEP_token, bug-I158_EOFILE_token,
+  bug-I158_FNUM_token, bug-I158_simple_real_token,
+  bug-I158_exponent_token = 14, bug-I158_integer_part_token = 16,
+  bug-I158_fraction_part_token = 18, bug-I158_digit_token = 20,
+  bug-I158_name_token, bug-I158_letter_token, bug-I158_SYMBOL_token = 24,
+  bug-I158_STRSYM_token, bug-I158_DIGITS_token = 27,
+  bug-I158_digit_string_token, bug-I158_STRING_token,
+  bug-I158_string_text_token = 31, bug-I158_GOSUB_token = 33,
+  bug-I158_LABEL_token, bug-I158_ON_token, bug-I158_INTERRUPT_token,
+  bug-I158_BREAK_token, bug-I158_CONTINUE_token, bug-I158_IF_token,
+  bug-I158_THEN_token, bug-I158_ELSE_token, bug-I158_ENDIF_token,
+  bug-I158_PRINT_token, bug-I158_INPUT_token, bug-I158_LINE_token,
+  bug-I158_RETURN_token, bug-I158_DIM_token, bug-I158_END_token,
+  bug-I158_AT_token, bug-I158_SCREEN_token, bug-I158_REVERSE_token,
+  bug-I158_AND_token, bug-I158_OR_token, bug-I158_NOT_token,
+  bug-I158_NE_token, bug-I158_LE_token, bug-I158_GE_token,
+  bug-I158_LT_token, bug-I158_GT_token, bug-I158_EQ_token,
+  bug-I158_READ_token, bug-I158_DATA_token, bug-I158_RESTORE_token,
+  bug-I158_OPEN_token, bug-I158_CLOSE_token, bug-I158_WINDOW_token,
+  bug-I158_DOT_token, bug-I158_CIRCLE_token, bug-I158_TEXT_token,
+  bug-I158_CLEAR_token, bug-I158_PRINTER_token, bug-I158_WAIT_token,
+  bug-I158_BELL_token, bug-I158_MAP_token, bug-I158_XMAP_token,
+  bug-I158_YMAP_token, bug-I158_ARROW_token, bug-I158_XTICK_token,
+  bug-I158_YTICK_token, bug-I158_SIN_token, bug-I158_ASIN_token,
+  bug-I158_COS_token, bug-I158_ACOS_token, bug-I158_TAN_token,
+  bug-I158_ATAN_token, bug-I158_EXP_token, bug-I158_LOG_token,
+  bug-I158_SQRT_token, bug-I158_MYEOF_token, bug-I158_INT_token,
+  bug-I158_FRAC_token, bug-I158_MOD_token, bug-I158_RAN_token,
+  bug-I158_LEN_token, bug-I158_VAL_token, bug-I158_LEFT_token,
+  bug-I158_RIGHT_token, bug-I158_MID_token, bug-I158_MIN_token,
+  bug-I158_MAX_token, bug-I158_STR_token, bug-I158_INKEY_token,
+  bug-I158_CHR_token, bug-I158_ASC_token, bug-I158_UPPER_token,
+  bug-I158_LOWER_token, bug-I158_TRIM_token, bug-I158_LTRIM_token,
+  bug-I158_RTRIM_token, bug-I158_INSTR_token, bug-I158_SYSTEM_token,
+  bug-I158_SYSTEM2_token, bug-I158_PEEK_token, bug-I158_PEEK2_token,
+  bug-I158_POKE_token, bug-I158_DATE_token, bug-I158_TIME_token,
+  bug-I158_UMINUS_token = 121, bug-I158_NAME_token, bug-I158_program_token,
+  bug-I158_statement_list_token, bug-I158_eof_token,
+  bug-I158_statement_list_token, bug-I158_statement_token = 129,
+  bug-I158_string_assignment_token, bug-I158_assignment_token,
+  bug-I158_for_loop_token, bug-I158_if_clause_token,
+  bug-I158_expression_token = 136, bug-I158_goto_list_token = 138,
+  bug-I158_gosub_list_token = 140, bug-I158_string_expression_token = 142,
+  bug-I158_printintro_token, bug-I158_printlist_token,
+  bug-I158_semicolon_token = 146, bug-I158_inputintro_token,
+  bug-I158_inputlist_token, bug-I158_readlist_token,
+  bug-I158_datalist_token, bug-I158_dimlist_token, bug-I158_mapping_token,
+  bug-I158_indexlist_token = 160, bug-I158_string_function_token = 167,
+  bug-I158_function_token = 170, bug-I158_next_or_eofile_token = 181,
+  bug-I158_next_symbol_token, bug-I158_condition_token = 185,
+  bug-I158_else_part_token = 188, bug-I158_endif_or_eof_token = 190,
+  bug-I158_input_token, bug-I158_readitem_token = 194,
+  bug-I158_stream_token = 197, bug-I158_position_token,
+  bug-I158_prompt_token = 200
+} bug-I158_token_type;
+
+typedef struct bug-I158_pcb_struct{
+  bug-I158_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];
+  bug-I158_vs_type vs[128];
+  int ag_ap;
+  const char *error_message;
+  char read_flag;
+  char exit_flag;
+  int bts[128], btsx;
+  int lab[6], rx, fx;
+  const unsigned char *key_sp;
+  int save_index, key_state;
+  char ag_msg[82];
+  const  int *ag_dtl;
+  int ag_dsn;
+} bug-I158_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 bug-I158_pcb_type bug-I158_pcb;
+void init_bug-I158(void);
+void bug-I158(void);
+#endif
+