--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/agcl/parsifal/good/ss-fp.h	Sat Dec 22 17:52:45 2007 -0500
@@ -0,0 +1,74 @@
+#ifndef SS-FP_H
+#define SS-FP_H
+
+typedef union {
+  double alignment;
+  char ag_vt_2[sizeof(int)];
+  char ag_vt_4[sizeof(number)];
+  char ag_vt_5[sizeof(format_code)];
+  char ag_vt_6[sizeof(pair<int>)];
+  char ag_vt_7[sizeof(char *)];
+  char ag_vt_8[sizeof(function_name)];
+  char ag_vt_9[sizeof(double)];
+} ss-fp_vs_type;
+
+typedef enum {
+  ss-fp_space_token = 1, ss-fp_grammar_token, ss-fp_cell_name_token = 4,
+  ss-fp_eof_token, ss-fp_input_line_token = 7,
+  ss-fp_conditional_expression_token, ss-fp_to_token = 14,
+  ss-fp_format_token = 18, ss-fp_alignment_token = 23,
+  ss-fp_conversion_token = 26, ss-fp_integer_token = 28,
+  ss-fp_column_id_token = 34, ss-fp_letter_token, ss-fp_digit_token = 37,
+  ss-fp_x_expression_token, ss-fp_expression_token, ss-fp_disjunction_token,
+  ss-fp_conjunction_token = 42, ss-fp_logical_value_token = 44,
+  ss-fp_comparison_token = 46, ss-fp_partial_comparison_token = 50,
+  ss-fp_summation_token = 57, ss-fp_term_token = 60, ss-fp_xxfactor_token,
+  ss-fp_xfactor_token = 63, ss-fp_function_token, ss-fp_factor_token,
+  ss-fp_yfactor_token, ss-fp_base_token, ss-fp_simple_factor_token = 69,
+  ss-fp_r_value_token, ss-fp_l_value_token, ss-fp_c_value_token,
+  ss-fp_number_token, ss-fp_parens_token, ss-fp_sigma_token = 76,
+  ss-fp_bound_variable_token, ss-fp_x_expression_string_token,
+  ss-fp_integer_part_token = 99, ss-fp_decimal_point_token,
+  ss-fp_fraction_part_token = 102, ss-fp_cell_name_request_token = 109,
+  ss-fp_input_line_request_token, ss-fp_block_request_token = 112,
+  ss-fp_nonzero_digit_token = 125, ss-fp_pi_token = 142
+} ss-fp_token_type;
+
+typedef struct ss-fp_pcb_struct{
+  ss-fp_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];
+  ss-fp_vs_type vs[128];
+  int ag_ap;
+  const char *error_message;
+  char read_flag;
+  char exit_flag;
+  unsigned char * pointer;
+  unsigned char * la_ptr;
+  const unsigned char *key_sp;
+  int save_index, key_state;
+} ss-fp_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
+void init_ss-fp(void);
+void ss-fp(void);
+#endif
+