/*
-- ANSI C code generated by :
-- SmallEiffel The GNU Eiffel Compiler -- Release (- 0.82)      --
-- Copyright (C), 1994-98 - LORIA - UHP - CRIN - INRIA - FRANCE --
-- Dominique COLNET and Suzanne COLLIN -    colnet@loria.fr     --
--                 http://www.loria.fr/SmallEiffel              --
*/
#include "pretty.h"
void X173pretty_print(void *C){
int id=((T0*)C)->id;
if (id <= 317) {
if (id <= 268) {
r268pretty_print(((T268*)C));
} else {
r317pretty_print(((T317*)C));
}} else {
r568pretty_print(((T568*)C));
}}
int X173arg_count(void *C){
int id=((T0*)C)->id;
if (id <= 317) {
if (id <= 268) {
return((int)(0));
} else {
return((int)(1));
}} else {
return((int)(/*(IRF4.6arg_count*/r431count(((T431*)((((T568*)((T568*)C)))->_arguments/*20*/)))/*)*/));
}}
T0* X173make_runnable(void *C,T0* a1,T0* a2,T0* a3,T0* a4){
int id=((T0*)C)->id;
if (id <= 317) {
if (id <= 268) {
return((T0*)(r268make_runnable(((T268*)C),a1,a2,a3,a4)));
} else {
return((T0*)(r317make_runnable(((T317*)C),a1,a2,a3,a4)));
}} else {
return((T0*)(r568make_runnable(((T568*)C),a1,a2,a3,a4)));
}}
void X355set_rescue_compound(void *C,T0* a1){
int id=((T0*)C)->id;
if (id <= 679) {
if (id <= 297) {
if (id <= 134) {
r134set_rescue_compound(((T134*)C),a1);
} else {
r297set_rescue_compound(((T297*)C),a1);
}} else {
if (id <= 649) {
r649set_rescue_compound(((T649*)C),a1);
} else {
r679set_rescue_compound(((T679*)C),a1);
}}} else {
if (id <= 844) {
if (id <= 696) {
r696set_rescue_compound(((T696*)C),a1);
} else {
r844set_rescue_compound(((T844*)C),a1);
}} else {
if (id <= 853) {
r853set_rescue_compound(((T853*)C),a1);
} else {
r883set_rescue_compound(((T883*)C),a1);
}}}}
void X355set_ensure_assertion(void *C,T0* a1){
int id=((T0*)C)->id;
if (id <= 679) {
if (id <= 297) {
if (id <= 134) {
/*[IRF3.3set_ensure_assertion*/((((T134*)(((T134*)C))))->_ensure_assertion)=(a1);
/*]*/
} else {
/*[IRF3.3set_ensure_assertion*/((((T297*)(((T297*)C))))->_ensure_assertion)=(a1);
/*]*/
}} else {
if (id <= 649) {
/*[IRF3.3set_ensure_assertion*/((((T649*)(((T649*)C))))->_ensure_assertion)=(a1);
/*]*/
} else {
/*[IRF3.3set_ensure_assertion*/((((T679*)(((T679*)C))))->_ensure_assertion)=(a1);
/*]*/
}}} else {
if (id <= 844) {
if (id <= 696) {
/*[IRF3.3set_ensure_assertion*/((((T696*)(((T696*)C))))->_ensure_assertion)=(a1);
/*]*/
} else {
/*[IRF3.3set_ensure_assertion*/((((T844*)(((T844*)C))))->_ensure_assertion)=(a1);
/*]*/
}} else {
if (id <= 853) {
/*[IRF3.3set_ensure_assertion*/((((T853*)(((T853*)C))))->_ensure_assertion)=(a1);
/*]*/
} else {
/*[IRF3.3set_ensure_assertion*/((((T883*)(((T883*)C))))->_ensure_assertion)=(a1);
/*]*/
}}}}